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1.0 GENERAL INFORMATION 
1.1 PROGRAM ABSTRACT 


THIS DCLT (DATA ice ade k LINK TEST) PROGRAM IS =" TO 
PROVIDE FIELD SERVICE WITH A TOOL TO MAINTAIN DPV-11 TO 
DPV-11 COMMUNICATION LINKS. THIS DCLT PROGRAM WILL PROVIDE 
THE COVERAGE NECESSARY TO DETECT FAILURES TO THE COMPUTER 
EQUIPMENT, THE CCMMUNICATION LINK, OR THE MODEM. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER 
TO THE XXDP+ USER'S MANUAL (CHQUS?.SEQ WHERE ? IS REV. LEVEL OF 
THE MANUAL). THERE IS A BRIEF DESCRIPTION OF 

THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT. 


1.2 SYSTEM REQUIREMENTS 


IN ORDER TO RUN THE DPV DCLT PROGRAM, THE FOLLOWING 
MINIMUM HARDWARE IS REQUIRED: 


- A LSI-11 CPU 

MINIMUM OF 24K WORDS OF MEMORY 

A WORKING CLOCK 

A CONSOLE TERMINAL 

ANY XXDP+ SUPPORTED LOAD MEDIA 

ONE OF THESE DPV-11 CONFIGURATIONS: 


DPV11-DB 
DPV11-DA 


1.3. RELATED DOCUMENTS AND STANDARDS 


- XXDP+ USER'S MANUAL (CHOQUS?.SEQ WHERE ? IS THE REV. LEVEL OF 


THE MANUAL ~ ‘'C’' IS THE CURRENT REV.). 


1.4 DIAGNOSTIC HIERARCY PREREQUISITES 


THE GOAL OF THE DATA COMM. LINK TEST PROGRAM IS TO a THE 
COMMUNICATION LINK AND THEREFORE ASSUMES THAT THE CPU 
CLOCKS, AND DVP=-11'S AT EACH END OF THE LINK HAVE AcREADY 
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BEEN TESTED. 


IF A WORKING CLOCK IS NOT FOUND, THE PROGRAM WILL CONTINUE 

BUT ANY OF THE PROGRAM THAT TiMES THE DEVICE WILL HANG IF THE 
DEVICE TIMES OUT. ALSO, THE EVENT LOG WILL CONTAIN A ZERO EVENT 
TIME FOR ALL EVENTS LOGGED. 


IT IS NOT THE INTENTION OF A DATA COMM. LINK TEST PROGRAM TO 
TEST THE DPV-11'S, BUT 1° TEST THE COMMUNICATION LINK TO 
WHICH THEY ARE CONNECTED. 


‘aan en DIAGNOSTICS THAT COULD BE RUN IF EITHER OF THE DPV-11'S 
LOOK : 


CVDPVAO DPV-11 FCTNL DIAG 
CXDPVAO DPV-11 DECX MODULE 


1.5 ASSUMPTIONS = RESTRICTIONS 


IT 1S ASSUMED THAT THE COMMUNICATIONS DEVICE (A DPV-11) HAS 

BEEN TESTED USING THE PREREQUISTE DIAGNOSTICS. THE OPERATOR 

SHOULD HAVE READ THE USER DOCUMENTATION PORTION OF THE LISTING 

TO FAMILIARIZE HIMSELF WITH THE COMMANDS AND CAPABILITIES AVAILABLE 
UNDER THE DIAGNOSTIC SUPERVISOR AND DCLT. 


THIS DIAGNOSTIC DOES NOT RUN THE DPV IN BIT STUFF MODE 
IT IS ASSUMED THAT IF THE LINK WORKS IN CHAR MODE THE LINK 
WILL WORK IN BIT STUFF MODE. 


SEQ 0005 





G1 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25=JUL-80 10:29 PAGE 7 


CVCLHA.P11 


25-JUL-80 


10:26 


2.0 OPERATING INSTRUCTIONS 

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP* USER'S MANUAL (CHQUS). 
2.1 COMMANDS 

THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 


(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP* USER'S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 

RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONT INUE CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER “C) 

PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 

ADD ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 

DROP DEACTIVATE A UNIT 

PRINT PRINT STATISTICAL INFORMATION (IF IMPLEMENTED 
BY THE DIAGNOSTIC = SECTION 4.0) 

DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 

FLAGS TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3) 

ZFLAGS CLEAR ALL FLAGS (SEE SECTION 2.3) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE +: aati $0 
YOU MAY, FOR EXAMPLE, TYPE ‘'STA'’ INSTEAD OF ‘’START' 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 


THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY ‘‘DDDDD"’. 


SWITCH EFFECT 


/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10. 
THIS LIST WILL CAUSE TESTS 1,5,7,8,9.10 TO 
BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 
/PASS:DDDDD EXECUTE DDDDD PASSES (DDDDD = 1 TO 64000) 
/FLAGS:FLGS i eiclide ts. FLAGS. FLAGS ARE DESCRIBED 
/EOP:DDDDD REPORT END OF PASS MESSAGE AFTER EVERY 


DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 
/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 

IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 

USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63) 


EXAMPLE OF SWITCH USAGE: 


SEQ 0006 
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START/TESTS:1=5/PASS:1000/E0P: 100 


THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE ‘'/TES:1=5'' INSTEAD OF ''/TESTS:1-5"". 


BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 
COMMAND. 


TESTS PASS FLAGS €0P UNITS 


RESTART X X 


coe FLAGS 


FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 

FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE 9F THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR = CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IER® INHIBIT ALL ERROR REPORTS 

IBE* INHIBIT ALL ERROR REPORTS EXCEPT 


FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 


IXE® INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACROS) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT Aid — AS TEST EXECUTES 

BOE "BELL'’ ON ERRO 

UAM UNATTENDED NODE (NO MANUAL tag ae 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 


APPLY TO DIAGNOSTICS WHICH Do. NOT SUPPORT 
STATISTICAL REPORTING) 





SEQ 0007 
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IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1 


SEE THE XXDP* USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PROCSAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 
AND TYPE A ‘'BELL’’ ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS:LOE:1ER:BOE 


2.4 HARDWARE QUESTIONS 


WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING ‘‘CHANGE HW (L) ?"' 
YOU MUST ANSWER ‘'Y'’ AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN ‘‘PRELOADED'’ USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A ‘'Y'', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). 


THE DPV-11 DATA COMM. LINK TEST PROGRAM WILL NOT USE MORE THAN 
th a Ke FOR THE DPV-11 , THE HARDWARE INFORMATION REQUESTED 
WILL : 


# UNITS (D) ? 1<CR> 


UNIT 0 

FULL DUPLEX OPERATION : (L) Y ? 

DPV CSR ADDRESS : (0) 160170 ? 
INTERRUPT VECTOR wt me 300 ? 
REMOTE NODE ‘‘ITEP"’ 


THE FULL DUPLEX QUESTION SHOULD BE ANSWERED ‘‘Y'’ WHEN USING 
FULL DUPLEX MODEMS,OR NULL MODEM, OR MODEM ELIMINATORS. 
ANSWER ''N’' FOR HALF DUPLEX MODEMS. 


REMOTE NODE ITEP SHOULD BE ANSWERED ‘'Y’' IF OTHER NODE 
1S RUNNING SOFTWARE THAT IS USING ‘“‘ITEP’’ FORMATS(I.E. 
COMM TURNARROUND SYSTEM OR PDP-11 RUNNING ITEP). 


SEQ 0008 
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2.5 DATA COMM. LINK TEST COMMANDS 


THE “‘DCLT>'’ COMMAND LEVEL FOLLOWS THE ANSWERING OF THE HARDWARE P-TABLE 
Tt baiutte.. THESE COMMANDS CAN BE TYPED WHEN THE ‘‘DCLT> (A) ?°* PROMPT 


MESSAGE COMMANDS 4VAILABLE: 


YOU ONLY HAVE TO TYPE ENOUGH CHARACTERS TO UNIQUELY SPECIFY A COMMAND. 


THE COMMAND LINE IS INTERPRETED FROM LEFT TC RIGHT. THEREFORE, 

IF A QUALIFIER ON THE COMMAND LINE IS RELATED OR EFFECTS A QUALIFIER 
TO THE LEFT ON THE COMMAND LINE, THE QUALIFIER FARTHEREST TO THE RIGHT 
TAKES PRECEDENCE SINCE IT IS INTERPRETED LAST. (I.E. IF /CHECK..... 
.../NOCHECK APPEAR ON THE SAME LINE, NOCHECK WILL BE INDICATED IN THE 
PARAMETERS WORD.) 


REFER TO SECTION 6.0 FOR A DESCRIPTION OF THE DIFFERENT MODES OF 
OPERATION AND THE TYPES OF MESSAGES AVAILABLE. 


2.5.1 MESSAGE COMMANDS 


COMMAND DESCRIPTION 


CLEAR €EXPECTLIST ZEROES THE EXPECTLIST (00'S) 
AND THEN PUTS DEFAULT ITEP MSG 
IN SO NOT REALLY EMPTY 


CLEAR TRANSMITLIST FILLS TRANSMITLIST (000'S) 
AND THEN PUTS DEFAULT ITEP MSG 
IN SO NOT REALLY EMPTY 

HELP TYPES HELP INFO FOR OPERATOR 


SET EXPEC TMSG=TYPE/QUAL DEFINE A MESSAGE TO BE PUT ON 
THE EXPECTED LIST 
WHERE: ‘‘TYPE’’ IS: 


nnn u 
“PO 
+. Oo 


aed 0. 9,SPACES OR TABS IN QUOTES’ 





SEQ 0009 


kK 1 
CVCLHA DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 11 


CVCLHA.P11 25-JUL-80 10:26 


SET 


SHOW 


SHOW 


PRINT 
DUMP 


SEQ 0010 


WHERE THE OPTIONAL ‘‘QUAL"’ IS: 
/S12E=NNN MAKE THE MESSAGE ‘'NNN’' BYTES 


/COPY=NN COPY THIS MESSAGE INTO THE 
BUFFER ‘'NN'’ TIMES (DEFAULT 
1S 0 = PUT THE MESSAGE IN 
ONLY ONCE) 


NOTE: SET'S ADD MESSAGES TO THE LIST IN THE ORDER THEY'RE 
DEFINED. ‘'NNN'’ IS A DECIMAL NUMBER. THE FIRST SET 
OVERWRITES THE DEFAULT ITEP MESSAGE PLACED THERE BY 
INITIALIZATION OR A ‘'CLEAR’’ COMMAND. 


SEE SECTION 6.2 FOR A DESCRIPTION OF The pes yeti: 
MESSAGES THAT ARE AVAILABLE. (ZEROS,ONES 


TRANSMI TMSG=TYPE/QUAL DEFINE A MESSAGE TO BE PUT ON 
THE TRANSMIT LIST 
(SEE DESCRIPT FOR SET EXP) 


EXPECTLIST LISTS THE MESSAGE SIZE AND TYPE 
FOR THE MESSAGES IN THE 
EXPECT LIST 


TRANSMITLIST LISTS THE MESSAGE SIZE AND TYPE 
FOR THE MESSAGES IN THE 
TRANSMIT LIST 


PRINTS THE EVENT LOG 
SSSSSS-EEFEEE/B PRINTS THE CONTENTS OF THE 


“EEEEEE’’ WHERE Rae al IS 
WHERE *'/B°' IS OPTIONAL: THE START ADDRESS AND 
DEFAULT IS PRINT WORDS “@EEEEE’' IS THE END ADDRESS. 


"/B'' CAUSES PRINT BYTES 
IF ‘‘-EEEEEE’’ IS NOT SPECIFIED 
THEN THE CONTENTS OF ‘'SSSSSS"’ 
1S PRINTED IN WORD FORMAT. 
1S PRINTED IN WORD FORMAT. 


NOTE: THE DUMP COMMAND IS USEFUL FOR EXAMINING 
MESSAGE DATA. STARTING ADDRESSES CAN 
BE FOUND BY LOOKING IN THE EVENT LOG. 


2.5.2 RUN COMMAND 
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DESCRIPTION 


RUN MODE=MTYPE/QUAL STARTS DCLT EXECUTING IN THE 


MODE SPECIFIED 


NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED 
iaseataies EACH TIME A RUN IS TYPED 


WHERE THE tia’ IS ANY ONE OF THE FOLLOWING: 
CTIVE (FORCES /NOECHO ,NO LOOPING) 


PASSIVE (FORCES NO LOOPING) 

=RECEIVE (FORCES /NOECHO ,NO LOOPING) 

=LISTEN (FORCES /NOECHO ,NO LOOPING, /NOCHECK) 
=TRANSMIT (FORCES /NOECHO ,NO LOOPING, /NOCHECK) 
=TALK (FORCES /NOECHO ,NO LOOPING, /NOCHECK) 


=DOWNL INELOAD oak neeeil tE aioe IS NOT SUPPORTED 
FOR DPV-11 TO DPV-11 LINKS). 


(FORCING NO LOOPING MEANS IT MUST BE 
SPECIFIED AS A QUALIFIER ANY TIME ITS 
DESIRED, THERE IS NO DEFAULT) 


AND OPTIONAL ‘‘QUAL"’ IS ANY COMBINATION OF THE FOLLOWING: 


/CHECK/NOCHECK ENABLES/DISABLES CHECKING OF RECEIVED 
DATA AGAINST THE EXPECTED DATA 


NOTE: IF BOTH NODES IN ACTIVE AND ‘'/NOCHECK’’ IS USED, 

anome END-OF-PASS IS DEFINED AS RECEIVING 1 MESSAGE 
AND COMPLETING THE TRANSMIT LIST. WITH NO DATA 
CHECKING, THERE IS NO WAY FOR DCLT TO KNOW HOW 
MANY MESSAGES IT SHOULD EXPECT TO RECEIVE. 


/STATUS/NOS TATUS a te te red PRINTING OF PROGRAM 
STATUS MESSAGES TO THE OPERATOR 
/ECHO/NOE CHO SOLES OL SLES ie RETRANSMISSION OF 
THE DATA RECEIVED IN PASSIVE MODE. 
(IGNORED IN MODES OTHER THAN PASSIVE) 
/MODEM/NOMODEM/ ati THE Bt OF MODEM STATUS 
/LOOP=LTYPE SPECIFIES WHICH, iF "or TYPE OF 
MAINTENANCE LOOPBACK 1S BEING USED. 
(IGNORED IN MODES OTHER THAN ACTIVE) 
MUST BE SPECIFIED EACH TIME ELSE NO 


LOOP IS USED 
“LTYPE'' IS: 
=INTERNALTTL LOOPS DATA INTERNAL TO USYNRT 
=CABLE USE THIS FOR TESTING WITH H3260 


OR H3259 TURNARROUND CONNECTOR 





SEQ 0011 
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NOTE: THIS SKIPS OVER THE CHECK 
FOR MODEM READY WHEN DTR IS SET. 


=LOCALMODEM NOT USED BY DPV 
=REMOTEMODEM # ” 


/PASS=NN SPECIFIES NUMBER OF ITERATIONS TO MAKE BEFORE 
END-OF=PASS. DEFAULT VALUE OF 1 
WILL BE USED ON ANY RUN THAT A /PASS=N 
1S NOT ADDED TO THE ‘'RUN ...'' COMMAND. 
IF A ‘'=1"' IS TYPED, THEN THE PROGRAM 
RUN UNTIL A “C IS TYPED. 


NOTE: SEE SECTION 6.1 FOR A DESCRIPTION 
omen OF THE ''RUN MODES'' AND ‘LOOP MODES"’ 


2.5.3 DEFAULTS 


IF NO “‘SET'S'' THEN THE DEFAULT IS SAME AS IF TYPED: 
SET TRANSMI TMSG=] TEP/S1ZE=58/COPY=0 
SET EXPEC TMSG=] TEP/S1ZE=58/COPY=0 


THE DEFAULT COPY AND SIZE FOR EACH OF THE MESSAGE TYPES: 
ONES - /SI1ZE=64/COPY=0 
ZEROES - /SIZE=64/COPY=0 
OALT - /SIZE=64/COPY=0 
1ALT = /SIZE=64/COPY=0 
CCITT = /SIZE=64/COPY=0 
ALPHA = /SIZE=65/COPY=0 
ITEP = /SIZE=58/COPY=0 
OPER. SPEC'D - /SIZE=LENGTH-OF -TEXT-TYPED-BE TWEEN-QUOTES/COPY=0 


FOR THE RUN COMMAND THE DEFAULTS ARE: 
RUN MODE=ACTIVE/NOSTATUS/CHECK/NOECHO/NOMODEM/PASS=1 
NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED 
ooene EACH TIME A RUN IS TYPED 
IF THE DCLT PROGRAM IS RUN IN UNATTENDED MODE (UAM FLAG=1 OR CHAINED), 
THE DEFAULTS ARE AS IF THESE SETUP AND RUN COMMANDS WERE TYPED: 
SET TRANS=ITEP 


SET EXPECT=ITEP 
RUN MODE=ACTIVE/LOOP=INTERNAL/NOSTAT/NOECHO/NOMODEM/ CHECK/PASS=1 


OTHER NOTES: 
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ALWAYS RETURNS YOU TO ''DR>'’ (THE SUPERVISOR) 
1S SEEN AS A COMMAND TERMINATOR 
DELETE LAST CHAR. TYPED IN COMMAND STRING 


SEQ 0013 
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2.6 QUICK START-UP PROCEDURE (XXDP+) 
TO START-UP THIS PROGRAM: 
1. BOOT XXDP+ 
2. GIVE THE DATE AND ANSWER THE LSI AND 50HZ (IF THERE 
IS A CLOCK) QUESTIONS 
3. TYPE "'R NAME'', WHERE NAME IS THE NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM 
4. TYPE ‘’START"' 
5. ANSWER THE ‘'CHANGE HW’ QUESTION WITH ‘'Y"’ 
6. ANSWER ALL THE HARDWARE QUESTIONS THE NUMBER OF UNITS 
THAT CAN DCLT CAN USE IS ALWAYS *. ’ 
WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 
DEFAULTS FOR FLAGS. THESE DEFAULTS ARE DESCRIBED IN SECTION 2.3. 
7, AFTER THE “‘DCLT> (A) ?°' PROMPT, TYPE 
“RUN MODE=ACTIVE<CR>"’ 
WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING int DEFAULT TRANSMIT 
AND EXPECTED MESSAGES. THE DEFAULT PASS COUNT AND ‘'RJN'' QUALIFIERS 
ARE ALSO BEING USED. THESE DEFAULTS ARE DESCRIBED IN SECIION 2.5.3. 


a a es 
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3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE "‘IER'’ oS IS SET (SECTION 2.3). 

THE GENERAL ERROR MESSAGE IS OF THE FORM 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC: XXXXXX 
ERROR MESSAGE 


»WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT? 
NUMBER = ERROR NUMBER 
UNIT NUMBER = 0 - N (N IS LAST UNIT IN PTABLE) 
TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE “‘IER'' OR “‘IBE’' FLAGS ARE SET (SECTION 2.3). THESE MESSAGES 
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 


EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR ee 

SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE “‘IER'', “‘IBE’' OR ‘‘IXE"’ FLAGS ARE SET (SECTION 2.5). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 SPECIFIC ERROR MESSAGES 


COMMAND LINE INTERPRETER ERRORS: 
ERROR MESSAGE: MEANING 


21LL CMD-BAD SYNTX? A COMMAND WITH AN ILLEGAL CHAR WAS 
TYPED - RETYPE THE COMMAND. THE 
VALID COMMANDS AND THEIR SYNTAX ARE 
SHOWN IN SECTION 2.5. 


7INCMPLTE CMD? —— PART OF A COMMAND WAS LEFT 


?NUM TOO BIG? THE VALUE OF A NUMERIC STRING IN THE 
COMMAND LINE WAS ‘cur THAN 65535 
OR 177777 OCTAL. ( > 16 BITS). 


7BAD RADIX? A ‘8B’ OR “'9"' WAS TYPED WHEN AN OCTAL 
STRING WAS EXPECTED. PROBABLY OCCURRED 
WHEN TYPING A ‘‘DUMP’’ COMMAND WHERE 
OCTAL ADDRESSES ARE EXPECTED. 
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2""LOOP’’ VALID ONLY IN ACTIVE? THE "'/LOOP=..'° SWITCH WAS TYPED IN A 
RUN COMMAND BUT THE MODE WAS NOT SET 
TO ACTIVE. MAINTENANCE LOOP IS ONLY 
atin If THE MODE OF OPERATION IS 


2"ECHO"’ VALID ONLY IN PASSIVE? ¥~ “7ECHO'’ SWITCH WAS TYPED IN A 
N COMMAND BUT THE MODE WAS NOT SET 
10 NPASSIVE. ECHOING OF ges DATA 
IS ONLY POSSIBLE IF THE MODE OF 
OPERATION IS PASSIVE. 


ILL CHR- ‘‘A=72,0-9,SP,TAB’’ ONLY? A CHARACTER TYPED WITHIN QUOTES WHEN 
TRYING TO DEFINE THE CONTENTS OF A 
TRANSMIT OR EXPECT MESSAGE WAS NOT 
A ‘‘A-2,0-9,SPACE OR TAB’. RETYPE THE 
COMMAND WITH ONLY THESE CHARACTERS 
BETWEEN QUOTES. 


?""S1ZE=0"' NOT VALID? A MESSAGE ZERO He LONG CAN y BE 
BUILT. RETYPE THE COMMAND WITH 
“/SIZE=NNN''. IF NO ''/SIZE="' is. TYPED 
A DEFAULT SIZE WILL BE USED. 


DCLT OR DEVICE ERROR MESSAGES: 
CLOCK NOT FOUND THIS MEANS THAT NO CLOCK WAS 
FOUND ON THE SYSTEM THE DIAG- 
NOSTIC WILL STILL RUN BUT NONE 
Soe TIME OUT CONDITIONS WILL 
U 


BAD CLOCK = PROGRAM WILL HANG ™, “TIMEQUT''!! 
HIS MEANS THAT THE CLOCK FOUND 
ON THE SYSTEM DID NOT —* 
WHEN ASKED TO DO A ‘‘TICK’ 


THE PROGRAM WILL STILL RUN, BUT ANY 

OF THE PROGRAM THAT TIMES THE DEVICE 
WILL HANG IF THE DEVICE TIMES OUT. 
ALSO, THE EVENT LOG WILL CONTAIN A 
ZERO EVENT TIME FOR ALL EVENTS LOGGED. 


MAX. CHAR. MSG COUNT EXCEEDED - MSG. NOT BUILT !! 


THIS MEANS THAT THE TRANSMIT OR EXF_CT 
BUFFER IS FULL. NO MORE MESSAGES CAN BE 
ADDED TO THAT BUFFER. 


BUFFER FULL = MSG. NOT BUILT !! 
THIS MEANS THAT THE LAST MESSAGE YOU 
TRIED TO ADD TO ELTHER THE TRANSMIT OR 
EXPECT BUFFER CAUSED THE TOTAL NUMBER 





—E 2 
CVCLHA DPy-11 DATA CUMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 18 
CVCLHA.P11 25-JUL-80 10:26 


OF MESSAGES TO BE EXCEEDED. NO MORE 
MESSAGES CAN BE ADDED TO THAT BUFFER. 
THE LIMIT IS DETERMINED BY THE SIZE OF 
THE MESSAGE POINTER TABLE. 


CHAR. COUNT EXCEEDS BUFF LIMIT = MSG TRUNCATED 


THIS MEANS THAT THE LAST MESSAGE YOU 
TRIED TO ADD TO THE TRANSMIT OR EXPECT 
BUFFER CAUSED THE TOTAL CHAR. COUNT 

FOR THAT BUFFER TO EXCEED THE LIMIT. 
THE MESSAGE WAS TRUNCATED TO COMPLETELY 
FILL THE BUFFER. NO MORE MESSAGES CAN 
BE ADDED TO THAT BUFFER. 


DATA COMPARISON DATA ERROR 
BYTE # IN MSG=XKX EXPTD=YYY RECVD=222 


XXK= OFFSET OF THAT BYTE FROM THE START 
OF THE COMPARE OR EXPECT MESSAGE. 

YYY= THE CONTENTS OF THAT BYTE IN THE 
EXPECTED MESSAGE 

Z22= THE CONTENTS OF THAT BYTE IN THE 
RECEIVED MESSAGE 


UP TO FIVE OF THESE ERRORS WILL BE 
PRINTED PER MESSAGE COMPARED. ONLY 
THE FIRST FIVE MISMATCHES WILL BE 
INDIVIDUALLY REPORTED, BUT TOTAL 
NUMBER OF MISTMATCHES IS REPORTED 
BY ANOTHER ERROR. 


PRINTING THE EVENT LOG AND USING THE 
DCLT “‘DUMP*’ COMMAND WILL ALLOW YOU TO 
FIND THE ADDRESS OF THE MESSAGE AND 
EXAMINE IT. 


DATA COMPARISON DATA ERROR 

TOTAL MISMATCHES IN MSG = NNN 
THIS MEANS THAT WHEN THE MESSAGE 
RECEIVED WAS COMPARED AGAINST THE 
MESSAGE THAT WAS EXPECTED, SOME OF 
THE CHARS. WERE NOT THE SAME. 


DATA COMPARISON LENGTH ERROR 
COMPARE COUNT= KXK RECEIVE COUNT= 227 


KKK= Ss : BYTES IN THE COMPARE 

222= NUMBER OF BYTES IN THE RECEIVED 
MESSAGE 

THIS MEANS THAT THE MESSAGE RECEIVED 

WAS A DIFFENT LENGTH THEN THE MESSAGE 

THAT WAS EXPECTED. 


MODEM STATUS CHANGES FOR THIS PASS WERE.. 


SEQ 0017 
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HARD CHANGES=XXXXK  =GLITCHES=XXXXX 


eeeeere 

* NOTE * = IN THE FOLLOWING ERR 

eetereer REFERS TO THE OCTAL 
SPECIFIED. 


MASTER RESET DID NOT WORK 
RXCSR TXCSR 
KK KKK XO00000% 


NO CLEAR TO SEND FROM MODEM 
RXCSR TXCSR 
KKK KKK KKK KKK 


sects OUT WAITING bs A RX OR TX TO COMPLETE 


YOOOO00% OOK 


MODEM DID NOT RETURN MODEM READY 
RXCSR TXCSR 


}OO00000 XOOO00000 
CRC IN ERROR 

RDSR RXCSR 
1OQ000% YOXOO0OK 
RECEIVER OVERRUN 

RDSR RXCSR 
XOU00000 XOO00000 


bin 34 OUT IN START, ee ACK SEQ 
RDAT SDAT 
ARXRRA SXXKRKK 


WHERE XXXXX IS A 5 DIGIT DECIMAL NUMBER 
THIS MSG IS ONLY PRINTED IF NUMBER OF 
ELTHER HARD CHANGES OR GLITCHES IS 
GREATER THAN 0. A HARD CHANGE IS ONE 
WHERE THE DPV WAS ABLE TO LATCH i" f 
DIFFERENCE IN THE MODEM STATUS. 

GLITCH IS WHEN A MODEM STATUS INTERRUPT 
OCCURS BUT THE DPV CANNOT FIND A 
DIFFERENCE IN STATUS BIT. 


OR DESCRIPTIONS XXXXX 
CONTENTS OF THE DEVICE REGISTERS 


THIS MEANS THAT AFTER A MASTER 
RESET WAS ISSUED TO DPV THE 
RXCSR REGSITER WAS NON ZERO. 


WHEN REQUEST TO SEND SIGNAL 
1S SET MODEM DOES NOT RESPOND 
WITH CLEAR TO SEND 


DEVICE TIMED OUT AFTER 
WALTNG FOR A RECIEVER OR 
TRANSMITTER TO COMPLETE 


MODEM DID NOT RESPOND WITH MR. 


THE CRC ERROR BIT IS CLEAR 
AT TIME THAT IT SHOULD BE SET 


RECIEVER DETECTED AN OVERRUN 


THIS ERROR OCCURS WHEN IN THE 
DEVICE INIT ROUTINE A TIME QUT 
OCCURS WHILE TRYING TO DO START 
STACK ACK START UP SEQUENCE. 
THE VALUES IN RDATA AND SDATA 
INDICATE THE LAST CONTROL CHAR 
TD aman AND TRANSMITTED 
AT 


SEQ 0018 
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4.0 PERFORMANCE AND PROGRESS REPORTS 


DCLT USES IT'S OWN METHOD FOR DETERMINING AN ‘END OF PASS" 

WHICH IS CALLED A ‘‘DCLT END OF PASS''. THE NUMBER OF ‘‘DCLT PASSES” 
TO BE RUN IS SPECIFIED BY THE ‘'/PASS=XXX'" SWITCH ON THE DCLT 

RUN COMMAND. THE TOTAL NUMBER OF ‘‘DCLT ERRORS’ IS REPORTED 

WHEN ‘' X NUMBER OF DCLT PASSES'’ ARE COMPLETED. 


4.1 PRINTING OF EVENT LOG 


SIGNIFICANT EVENTS OR CHECK-POINTS WILL BE LOGGED IN A 

“CIRCULAR QUEUE'’ STORAGE AREA CALLED THE EVENT LOG. THE LAST 

"W'' EVENTS ARE KEPT LOGGED AND CAN BE LISTED ON THE OPERATORS 

CONSOLE BY GIVING A ‘PRINT’ COMMAND AT THE ‘'DR>''(DIAGNOSTIC SUPERVISOR) 
OR ‘DCLT>’’ (DCLT) LEVEL. THE EVENTS ARE PRINTED IN A ‘‘LAST=IN 
FIRST=OUT'’ ORDER. 


EVENT TIME IS TYPED OUT AS MMM:SS:TT (LIKE 254:36:07) WHERE MMM,SS,T: 
REPRESENT THE NUMBER OF MINUTES, SECONDS, CLOCK TICKS SINCE THE LAST 
START OR RESTART. IT SHOULD BE NOTED THAT THE TIMES ARE 

RELATIVE SINCE WHILE THE PROCESSOR IS RUNNING AT PRIORITY 7 

THE CLOCK CAN'T INTERRUPT TO KEEP TIME. THIS IS THE CASE 

WHILE THE PROGRAM IS FETCHING DCLT COMMANDS FROM THE OPERATOR. 

IT SHOULD ALSO BE NOTED THAT THERE ARE ONLY 8 BITS AVALIABLE TO STORE 
RELATIVE MINUTES SO ‘TIME’ WILL WRAP TO 000:00:00 AFTER 256:59:59. 


A START OR RESTART COMMAND AT THE ‘DR>"’ LEVEL INITIALIZES THE EVENT 
LOG. THEREFORE IT IS WISE TO DO A ‘PRINT’ AT THE “‘DR>'’ LEVEL 
BEFORE GIVING A “‘START'' OR "'RESTART". 


THE TYPES OF EVENTS KEPT IN THE EVENT LOG ARE: 


TRANSMIT MESSAGE QUEUED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 
TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 
TRANSMIT MESSAGE COMPLETED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 
TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 
RECEIVE SPACE QUEUED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 
TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 
RECEIVE MESSAGE COMPLETED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 
TOTAL NO. QF BYTES, MODEM STATUS AT THAT TIME. 
DATA COMPARISON STARTED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG., 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES 
IN EXPECT MSG. 
DATA COMPARISON DATA ERROR: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG., 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF 
COMPARISON FAILURES 


EE - — 
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DATA vag tet LENGTH ERROR: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG., 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES 
IN EXPECT MSG. 

DEVICE iNIT a SETUP: 
EVENT TIME, MODE OF OPERATION, TYPE OF — 
LOOP, 'DCLT' PASS COUNT, ''RUN” PARAMETERS 

DEVICE ERROR: 
EVENT TIME, DEVICE ERROR gy fh CONTENTS OF TWO 
REGISTERS RELATING TO THE ERR 

END OF PASS: 
EVENT TIME, ‘’DCLT’’ PASS COUNT, ‘'DCLT'’ ERROR COUNT, 
AND THE ‘'STRT=TO''(COUNT OF START TIME OUTS). 


4.2 OPERATOR STATUS MESSAGES 


THE ‘‘/STATUS, /NOSTATUS'’ QULAIFIERS FOR THE DCLT ‘'RUN'' COMMAND 

ENABLES/DISABLES THE PRINTING OF PROGRAM STATUS MESSAGES TO THE 

OPERATOR. THESE MESSAGES ARE INTENDED TO TELL THE OPERATOR WHAT 
THE DCLT PROGRAM IS CURRENTLY DOING. BELOW ARE THE MESSAGES THAT 
MIGHT BE PRINTED AND THEIR MEANING: 


MESSAGE MEANING 

TxQ DEVICE IS ABOUT START TRANSMITING A MESSAGE 

TXC TRANSMISSION OF MESSAGE COMPLETED 

RXQ DEVICE HAS QUEVED SPACE TO RECEIVE/ COMPLETED RECEIVE 
ERR DEVICE ERROR HAS OCCURRED 

INI DEVICE ABOUT TO BE INITIALIZED 

MSC ABNORMAL MODEM STATUS CHANGE 

CMP ABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD DATA 

CML LENGTH ERROR OCCURRED DURING DATA COMPARISON 

CMD DATA ERROR OCCURRED DURING DATA COMPARISON 


EGP END OF PASS 





eee... 
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5.0 DEVICE INFORMATION TABLES 


THIS IS THE DEFAULT HARDWARE P=TABLE. THE VALUES AND 

SIZE ARE USED AS A ‘'TEMPLATE'’ FOR CREATING ACTUAL P-TABLE 
ENTRIES AND THE DEFAULT VALUES PROVIDED FOR THE OPERATOR. 
SEE SECTION 2.4 FOR AN EXAMPLE OF THE HARDWARE QUESTIONS. 


THE NUMBERS IN BRACKETS ( I.€. (10) INDICATES THE OFFSET OF THE 
WORD INTO THE HARDWARE P-TABLE. THE OFFSETS MUST MATCH THE P-TABLE 
OFFSETS USED IN THE HARDWARE PARAMETER CODING SECTION WHERE THE 
"GET PARAMETER’ CALLS ARE USED TO FILL THE P-TABLE. 


. WORD 1 :€0] FULL GR HALF DUPLEX FLAG (B1TO=1 IF FULL) 
WORD 160170 :€2] CSR ADDRESS 

~ WORD 300 304] INTERRUPT VECTOR 

. WORD 240 3(6] SPARE 

.wORD 360 3010] SPARE 

~ WORD 0 3012] SPARE 

WORD 0 3014] REMOTE NODE ‘‘ITEP’’ 


6.0 MODE AND MESSAGE DESCRIPTIONS 


6.1 MODE DESCRIPTIONS 


THE FOLLOWING MODE DESCRIPTIONS REFER TO MESSAGE LISTS BEING 
TRANSMITTED AND RECIEVED BE AWARE THAT OTHER DATA IS ALS 

SENT WITH THE MESSAGE. MESSAGE FORMATS ARE..... 177(OCTAL)SYNC 
CHARS; SOH CHAR(201),BYTE COUNT OF MSG.(2 BYTES); THREE BYTES OF 
OCTAL 001;2 BYTES OF CRC;THE MESSAGE BODY; 2BYTES OF CRC. 

IF REMOTE NODE ITEP QUESTION IS ANSWERED Y THEN SYNC CHAR WILL 
BE OCTAL 26 INSTEAD OF 226;NO SOH,BYTE COUNT OR HEADER DATA WILL 
BE SENT. ON FULL DUPLEX LINKS A START STACK ACK SEQ WILL BE SENT 
ONCE AT INIT TIME FOR EACH MODE. THIS SEQUENCE CONTAINS CONTROL 
MESSAGES WHOSE FORMAT IS ..8 SYNC CHAR, 1BYTE ENQ(005),START 
STACK OR ACK,3 BYTES OF 001, AND 2BYTES OF CRC. 


TRANSMIT MODE 


A LIST OF MESSAGES IS TRANSMITTED WITHOUT EXPECTING ANY DATA 
TO BE RECEIVED. 


RECEIVE MODE 


SPACE 1S QUEVED FOR THE DEVICE TO RECEIVE MESSAGES. 

AFTER RECEIVING AN "EXPECTED’’ NUMBER OF MESSAGES, THE DATA RECEIVED 
CAN BE COMPARED AGAINST A LIST OF ‘EXPECT TO RECEIVE’ MESSAGES 

IF DATA=CHECKING IS ENABLED. 
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PASSIVE MODE 


THEN EVERY TIME A MESSAGE IS RECEIVED, A MESSAGE IS TRANSMITTED. 
DATA CHECKING CAN BE DONE ON THE RECEIVED DATA. THE see /NOE CHO’ 
ENABLES/DISABLES THE RETRANSMISSION OF THE DATA RECEIVED 


ACTIVE MODE 


IST OF MESSAGES IS TRANSMITTED AND MESSAGES ARE RECEIVED. 

ER RECEIVING AN “'EXPECTED'' NUMBER OF MESSAGES, THE DATA RECEIVED 
BE COMPARED AGAINST A LIST OF “EXPECT TO RECEIVE’ MESSAGES 
DATA=CHECKING IS ENABLED. 


2a—«r- 


NOTE: IF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE 
LINK MUST BE A FULL OUPLEX LINK! 


DOWN=L INE=-LOAD 


DOWN-LINE-LOADING IS NOT SUPPORTED FOR DPV-11 TO DPV-11 LINKS. 


TALK MODE 


THE ““TALK'’ END OF THE LINK TRANSMITS OPERATOR-TYPED MESSAGES 
UNTIL A ‘EXIT’ MESSAGE IS TYPED, AT THAT POINT, THE NODE GOES 
INTO LISTEN’ MODE. AN ‘EXIT MESSAGE’ IS A MESSAGE WHOSE FIRST 
FOUR CHARACTERS ARE “EXIT. SINCE ONLY THE FIRST FOUR CHARACTERS 
NEED TO BE “‘EXIT'’, MORE CHARACTERS CAN BE ADDED SO THAT A MESSAGE 
MAY BE SENT AND THE MODE SWITCHED ALL AT ONCE. FOR EXAMPLE: 


TLK> EXIT ALL OF THIS LINE IS SENT THEN MODE SWTICHED 


LISTEN MODE 


TEN’ END OF THE A PRINTS ALL OF THE MESSAGES 
+! THE DEVICE ON THE OPERATOR'S CONSOLE. IF THE MESSAGE 


AN "EXIT’ MESSAGE, THEN THE NODE ENTERS “'TALK'’ MODE. 


MESSAGE’ IS A MESSAGE WHOSE FIRST FOUR CHARACTERS ARE "EXIT". 


SEQ 0022 


| 
| 


| 
| 
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MAINTENANCE ‘‘LOOP’’ MODES 


REMEMBER THAT THE WHENEVER A ‘'RUN'’ COMMAND IS TYPED, THE ome Is 
NO LOOPBACK AND THAT A LOOP MODE MUST BE SPECIFIED BY A ‘'/LOOP= 

IF A LOOP MODE IS DESIRED. 

LOOP MODES ARE ONLY VALID IF THE MODE TO RUN IS ACTIVE ! 


INTERNALTTL LOOPS DATA INTERNAL TO THE USYNRT 


THE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGETHER 
ee he theese 1S RUNNING ON TWO PROCESSORS (ONE AT EACH 


DUPLEX » STAT ION A ATION B : 


START HOST" NODE ‘'/LOOP'’ ALLOWED? PREMOTE” NODE DUPLEX ; 
8 iTALK NO LISTEN*, RECEIVE HALF OR FULL! 
A ‘LISTEN NO TALK*, TRANSMIT HALF OR FULL! 
8 ! TRANSMIT NO RECEIVE*, LISTEN HALF OR FULL! 
he ‘RECEIVE NO TRANSMIT®*, TALK HALF OR FULL! 
a !PASSIVE NO ACTIVE® HALF OR FULL! 

-NA- ‘ACTIVE YES ACTIVE? FULL ; 
B -ACTIVE YES PASSIVE® HALF OR FULL: 


NOTE: H/D START COLUMN INDICATES WHICH NODE TO START FIRST ON A 
HALF DUPLEX LINK 


6.2 MESSAGE DESCRIPTIONS 
NAME DESCRIPTION 


ZEROES MESSAGE OF ALL 0° 
MESS OF 


LAZY 00G.<15><12><001><17 


ALPHA on Peareneeiss (OR FUTURE 
(#$!*" (AMPERSAND) '()*¢,-.0 
LMNOPORSTUVWXYZ/C\}*_ 4) 


-NA- ' DOWNL INELOAD ** DOWN-LINE=LOADING IS NOT yg FOR DPV-11 
: TO DPV-11 LINKS, : 
*= MOST LIKELY TO BE IN THAT MODE 
f 
yA. THE auieK grows 
> 
¢ 
1 
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OPERATOR=SPECIFIED ""A=1 ,0-9, SPACES, TABS'’ 


THESE ARE THAT THE CHARACTERS THAT CAN 
BE TYPED BETWEEN QUOTATION MARKS (''..'') 
TO SPECIFIY A UNIQUE MESSAGE. 


SEQ 0024 
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6.3 INTERFACING TO AN ‘‘ITEP’’ NODE 


THESE ARE THE RULES WHEN USING ITEP/WITH A DUP TO TALK 
TO A DPV USING DCiT. 


ITEP NODE DCLT NODE 
ANSWER ALL QUESTION TO THE ANSWER ALL _—— TO THE 
SET SWITCHES PROMPT. DCLT> PROMPT 


SRKTASRAAAAREAAAAHARAAAAHAEEHAAHHAEREHEREREREKETAREREHRAREARAe 


FOR ONE WAY OUT.. 
SET SWITCHES TO 1221 CLEAR EXPECTED 
SET E=1TEP/S=56 
RUN MODE=REC/STATUS/CHECK 


NOTE: DUP ITEP SENDS ONLY 56 CHARS 


TRRRRRSRERSLELES ESAS RSE EERE EER REAR RRR RR RA RAAR ARR RRA RRR RAR AAS A 


FOR ONE WAY hs wane 
SET SWIICHES TO ....1222 RUN MODE=TRA/STATUS 


Seeeeeererereeeadeeekteteeereeteeeeeteeeeeretereeeeeereeeeeee 
FOR EXTERNAL LOOPBACK.... 
SET SWITCHES....... 1224 CLEAR EXPECTED 

SET EXP=I1TEP/S=56 

RUN MODE=ACTIVE/STATUS/CHECK 


RHHKHKHAEHAHAAAeeAeeeReeeteeeeeeeeeeeeeeeeeteeeeteneteeeeteeee 


FOR INTERNAL LOOPBACK...... 


SET SWTICHES......1260 CLEAR EXPECTED 
SET EXP=ITEP/S=56 
RUN MODE =ACTIVE/STATUS/CHECK 


SHEP RAHHAHEREHAAAAAAEHERAAAEHEAAAAAAAEKEKEeeEeTeeeeeeeeeeeeeene 


NOTE: DO NOT a SWITCH . WITH ITEP ores TO OCLT 
THE ONLY MESG. DCLT SUPPORTS IS MSG 1. 
DCLT IGNORES CRC ERRORS WHEN REC DATA FROM ITEP 
BECAUSE ITPE SENDS NO CRC. 


6.4 TROUBLESHOOTING HINTS 
peoree abt oe ARE SOME SETUPS THAT COULD BE USED FOR ISOLATING FAULTS. 


Y NO MEANS THE ONLY WAYS +33) CAN BE USED [ttitt! 
DCLT IS MEANT TO BE A VERY FLEXIBLE TOOL! THIS SECTION IS MEANT TO 





ae 
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GIVE SOMEONE NOT TOO FAMILIAR WITH DCLT A PLACE TO START. 


REMEMBER THAT THE PRINTING OF STATUS MESSAGES AND PRINTING OF THE 
EVENT LOG CAN PROVIDE A LOT OF INFORMATION ABOUT THE SEQUENCE OF 
EVENTS AND HOW THE DEVICE AND LINK ARE BEHAVING. 


NOTE: IF BOTH NODES IN ACTIVE AND "'/NOCHECK’' IS USED, 

anuce END-OF “PASS IS DEFINED AS RECEIVING 1 MESSAGE 
AND COMPLETING THE TRANSMIT LIST. WITH NO DATA 
CHECKING, THERE IS NO WAY FOR DCLT TO KNOW HOW 
MANY MESSAGES IT SHOULD EXPECT TO RECEIVE. 


1.) INTERNAL LOOP AT EACH NODE 


RUN EACH END OF THE LINK IN ACTIVE MODE WITH LOOP=INTERNAL. 
TRANSMIT TWO OR THREE MESSAGES WITH NO DATA CHECKING. 

STATUS PRINTING COULD BE TURNED OFF IF ON, BUT SEEING THE SEQUENCE 
OF EVENTS MIGHT BE INFORMATIVE. 


A POSSIBLE COMMMAND SEQUENCE IS: 
Ce 


CT 
SE T=ONES/S=20/C=2 
R M=A/LO=] /NOCH/STAT 


THIS GIVES YOU A IDEA IF THE COMM. DEVICE CAN EVEN TRANSMIT AND 
RECEIVE. ANY ERRORS REPORTED WILL PROBABLY BE DUE TO INCORRECT 
DEVICE ADDRESSES BEING USED OR A FAULTY DEVICE. CHECK ADDRESSES 
«he at ll AND RUN THE PREREQUISTE DIAGNOSTICS FOR THE COMM. 


NOW TRY RUNNING EACH NODE THE SAME WAY WITH DATA CHECKING ENABLED. 
A POSSIBLE COMMMAND SEQUENCE IS: 

R M=A/LO=1/CH/PAS=3 
IF A CABLE TURNAROUND CONNECTOR IS AVAILABLE, PUT IT ON THE END OF 
THE CABLE JUST BEFORE THE MODEM AND RUN IN ACTIVE MODE WITH NO LOOP. 
POSSIBLE COMMAND SEQUENCE IS: 


R M=A/CH/PAS=3 


2.) TRANSMIT ON ONE NODE RECEIVE ON THE OTHER 


NOW TRY TRANSMIITING FROM ONE END AND RECEIVING ON THE 
OTHER, MAYBE WITH NO DATA CHECKING AT FIRST TO ESTABLISH 
If THE LINK IS WORKING. POSSIBLE COMMAND SEQUENCES ARE: 


NODE A NODE B 


CE Ce 
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T CT 
T=1ALT/S=250 z E=1ALT/S=250 
M=TR/PAS=3 R M=R/NOCH/PAS=3 


NOW TRY DOING DATA CHECKING ON THE MESS4GE(S) BEING 
TRANSMITTED. POSSIBLE COMMAND SEQUENCES ARE: 


R M=TR/PAS=3 R M=R/CH/PAS=3 


NOW RUN THRU THE SEQUENCE AGAIN WITH NODE A RECEIVING 
AND NODE B RECEIVING. 


C 
SE 
R 


3.) ONE NODE ACTIVE THE OTHER NODE PASSIVE 


NOW TRY RUNNING ONE NODE IN ACTIVE MODE WHILE THE OTHER 
END RUNS IN PASSIVE. DATA CHECKING SHOULD BE TURNED OFF 
IF THE MESSAGE LISTS ARE NOT THE SAME. 

POSSIBLE COMMAND SEQUENCES ARE: 


NODE A NODE B 

CE CE 

2 CT 

SE T=CCITT/S=10/C=2 SE T=1ALT/S=20/C=2 
R M=ACT/NOCH/PAS=3 R M=P/NOCH/PAS=3 


NOW USE DATA CHECKING WITH THE “EXPECT MESSAGE LISTS'’ SET 
UP APPROPRIATELY. ANOTHER VARIATION IS TO HAVE LARGE SIZE 
MESSAGES ON ONE SIDE WITH SMALL MESSAGES ON THE OTHER. 


THEN <VERSE THE SETUP SO THAT THE NODE RUNNING IN ACTIVE 
1S RUNNING IN PASSIVE AND VICE VERSA. 


4.) BOTH NODES ACTIVE 


NOW BOTH NODES CAN BE RUN IN ACTIVE WITH DATA CHECKING ON, 
age hy PRINTING COULD BE TURNED OFF IF YOU'RE NOT INTERESTED 
NT 

NODE A NODE B 

CE CE 

cq CT 

SE T=OALT/S=10 SE E=OALT/S=10 

SE T=CCITT/S=20 SE E=CCITT/S=20 

SE T=ALPHA/S=30 SE E=ALPHA/S=30 

SE E=ZERO/S=11 SE T=ZERO/S=11 

SE E=ONES/S=21 SE T=ONES/S=21 

SE E=ITEP/S=31 SE T=1TEP/S=31 

R M=A/CH/NOST/PAS=3 R M=A/CH/NOST/PAS=3 





-+++—— HF 


SEQ 0027 
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A VARIATION THAT CAN BE USED IS FOR ONE END TO SEND A LOT OF 
SMALL MESSAGES AND THE OTHER TO SEND A FEW LARGE MESSAGES. 
ig Oy etal POINT WILL BE OUT OF SYNC BUT THIS IS NOT 


5.) TALK AND LISTEN MODES FOR COMMUNICATING 


TALK AND LISTEN MODES ARE USEFUL IF THE OPERATORS WISH TO COMMUNICATE 
WITH EACH OTHER. JUST SETUP A TIME THAT EACH WILL GO TO THEIR MODE, 
sokueuret kat’ AND SEND MESSAGES OVER THE LINK. POSSIBLE COMMAND 


R M=LIS/NOST R M=TA/NOST 
LIS> TLK> 


SEQ 0028 
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286 

1287 

1288 

1289 

i 3.4 .SBTTL PROGRAM HEADER 

1292 002000 BGNMOD 

1293 

1294 

1295 

1296 

1297 

1298 p+ 

1299 ; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 

1ene > THE DIAGNOSTIC PRYGRAM AND THE SUPERVISOR. 

1302 

Ft 002000 POINTER BGNRPT,BGNAU,SGNDU 

1305 

1306 

1307 

1308 

1309 002000 HEADER CVCLH,A,0,1800.,0,#PR107 

1310 002000 LENAME : : 

1311 002 103 ASCII /C/ 
1312 002001 126 eASCII /V/ 
1313 00200 103 eASCII /C/ 
1314 00200 114 eASCII /t/ 

1315 2004 110 ASCII /H/ 

1316 002005 000 -BYTE 0O 

1317 2006 000 -BYTE Q 

1318 002007 000 -BYTE 0O 

1319 002010 LSREV:: 

1320 002010 101 ASCII /A/ 

1321. 002011 LSDEPO: : 

1322 002011 060 ASCII /0/ 
1323 002012 LSUNIT:: 

1324 002012 000000 .wOoRD O 
1325 002014 LSTIML:: 

1326 092014 003410 ~ WORD 1800. 
1327 002016 LSHPCP:: 

1328 002016 033706 «WORD LSHARD 
1329 002020 LSSPCP:: 

1330 002020 000000 .woRD 0 
1331 002022 LSHPTP:: 

1332 002022 002130 «WORD LSHW 
1333 002024 LSSPTP:: 

1334 002024 000000 .wORD 0 
1335 002026 LSLADP: : 

1336 002026 034164 .WORD LSLAST 
1337 0020 LSSTA:: 

1338 002030 000000 word 0 
1339 002032 .$CO:: 

1340 002032 000000 -wORD 0 
1341 002034 LSOTYP:: 
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CVCLHA, 25-JUL-80 10:26 PROGRAM HEADER SEG 0030 
1342 002034 000000 «WORD 0 
1343 002036 LSAPT:: 
1344 002036 000000 «WORD 0 
1345 002040 LSDTP:: 
1346 0020460 002124 ~ WORD LSDISPATCH 
1347 002042 LSPRIO:: 
1348 002042 000340 .WORD #PRIO7 
1349 002044 LSENVI:: 
1350 002044 000000 «WORD 0 
1351 002046 LSEXP1:: 
1352 002046 000000 «WORD 0 
1353 002050 LSOMREV:: 
1354 002050 003 -BYTE  CS$REVISION 
1355 002051 003 -BYTE CS$EDIT 
1356 002052 LSEF:: 
1357 002052 000000 «WORD 0 
1358 002054 000000 «WORD 0 
1359 002056 L$SPC:: 
1360 002056 000000 «wOoRD 0 
1361 002060 LSDEVP: : 
1362 002060 011422 ~ WORD LSDVTYP 
1363 002062 LSREPP:: 
1364 002062 022720 -WORD LS$RPT 
1365 002064 LSEXP4:: 
1366 002064 000000 «WORD 0 
1367 002066 LSEXPS:: 
1368 002066 000000 «WORD 0 
1349 002070 LSAUT:: 
1370 002070 023612 -WORD LS$AU 
1371 002072 L$DUT:: 
1372 002072 023604 «WORD L$DU 
1373 002074 LSLUN:: 
1374 002074 000000 -wORD 0 
1375 002076 LSDESP:: 
1376 002076 011432 WORD LSDESC 
1377 002100 LSLOAD:: 
1378 002100 104035 EMT ESLOAD 
1379 002102 LSETP:: 
1380 002102 000000 «WORD 0 
1381 002104 LSICP:: 
1382 002104 022734 «WORD LSINIT 
1383 002106 LSCCP:: 
1384 002106 023562 «WORD LSCLEAN 
1385 002110 LSACP:: 
1386 002110 023560 «WORD LSAUTO 
1387 002112 LSPRIT:: 
1388 002112 022726 «WORD LSPROT 
1389 002114 LSTEST:: 
1390 002114 000000 -wORD 0 
1391 002116 LSDLY:: 
1392 002116 000000 .wORD 0 
1393 002120 LSHIME:: 
it 002120 000000 «WORD 0 


— - 





ee 
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1346 -SBTTL DISPATCH TABLE 


1399 4 THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
saat x 1 1S USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 


1403 002122 DISPATCH 1 

1404 002122 000001 «WORD 1 
1405 002124 LSDISPATCH:: 

1406 002124 023620 «WORD 11 


ee ee — 


G 3 
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1408 .SBTTL DEFAULT HARDWARE P-TABLE 

1409 

1410 poe 

1411 ; THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 

1412 ; THE TEST=DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 

1413 : IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 

ste ; AND IS USED AS A ‘TEMPLATE’ FOR BUILDING THE P-TABLES. 

1416 

1417 002126 BGNHW DFPTBL 

1418 002126 000010 «WORD 110000-L$HwW/2 
1419 002130 LSHW: : 

1420 002130 DFPTBL:: 

1421 

1422 

1423 ; INDEPENDENT SECTION 

1424 3 THE NUMBERS IN BRACKETS ARE THE OFFSET VALUES USED IN THE PARAMETER 
1425 ; CODING SECTION. 

1059 

sess 002130 000001 «WORD 1 3€0] FULL OR HALF DUPLEX FLAG (BITO=1 IF FULL) 
4 

1430 

1431 

1432 ;DEVICE DEPENDENT SECTION eee! 

1433 : ADDING OR REMOVING WORDS FROM THIS TABLE EFFECTS THE “'GET’’ CALLS IN 
pt : THE HARDWARE PARAMTER CODING SECTION BY CHANGING ‘‘OFFSETS"’ 

14 

1436 002132 160170 WORD 160170 302] CSR ADDRESS 

1437 002134 000300 -WORD 300 :€4] INTERRUPT VECTOR 

1438 002136 000240 -WORD 240 306) aes PRIORITY (5) 

1439 002140 00000 -WORD 0 3€10] §$ 

1440 002142 00000 -WORD 0 :C12) $ A Kile 

1441 002144 000000 . WORD 0 3€14] orn NODE "‘ITEP 

1442 002146 000000 WORD 0 3116] § 

1443 

1444 

1445 002150 ENDHW 


1446 002150 


L10000: 





; - 
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002150 


25-JUL=80 10 


100000 


:26 


DEFAULT HARDWARE P-TABLE 


-SBTTL GLOBAL EQUATES SECTION 


3° 


; THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 


; ARE USED IN MORE THAN ONE TEST 
EQUALS 

DIFINITIONS 
100000 


nnnnnnnnnnnnnnnn 
= 
SoS 
o 


ee 
Pele lelelelolololola) 
O—MWWF WO n@O 


= 
“ 
" 
~ 
~~ woOowwwoooo® 
oe ee ee 


“> 
= 


; EVENT 
EF 32: 


| 
S 
.START== 3 
RESTART== Hy 
. CONT INUE == 
oNEW== 3 
.PwR== 2 


ees ws 


: 
8. 


; START COMMAND WAS ISSUED 


; CONT 


NITIONS 

ERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 
2. 

- 


; RESTART COMMAND WAS ISSUED 


COMMAND WAS ISSUED 


INUE 
; A NEW PASS HAS BEEN STARTED 
; A POWER-F 


AiL/POWER-UP OCCURRED 


SEQ 0033 





se 
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CVCLHA.P11 25-JUL-80 10:26 GLOBAL EQUATES SECTION SEQ 0034 
1503 ; 
\ahe ; PRIORITY LEVEL DEFINITIONS 
1506 000340 PRIO7== 340 
1507 000300 PR1I06== 300 
1508 000240 PRIOS== 240 
1509 000200 PR104== 200 
1510 00140 PRIO3== 140 
1911 000100 PRIO2== 100 
1512 000040 PRIO1== 40 
a 000000 PRI00== 0 
1515 SOPERATOR FLAG BITS 
1516 : 
1517 04 EVL== 
1518 000010 LOT== 10 
1519 000020 ADR== 20 
1520 040 1DU== 40 
1521 000100 1SR== 100 
1522 000200 UAM== 200 
1523 00 BOE == 400 
15246 001000 PNT == 1000 
1525 002000 PRI]== 2000 
1526 000 1XE== 4000 
1527 010000 1BE== 10000 
1528 020000 IER== 20000 
1529 0000 LOE == 40000 
1330 100000 HOE == 100000 
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1388 

153 

1534 001000 
1535 

1536 000017 
1537 

1538 

1539 

1540 

1541 

94 | 

1546 000000 
1544 000001 
1545 000002 
1546 000003 
1547 00 
1548 000005 
1549 

1550 

1551 000000 
1552 000001 
1553 000002 
1554 000003 
1555 000004 
1556 000005 
1557 

1558 

1559 

1560 10 
1561 000111 
1562 001600 
1563 

1564 

1565 

1566 000001 
1567 000002 
1568 000004 
1569 000010 
1570 000020 
1971 000040 
1572 

1573 

1574 

1575 

1576 000000 
1577 

1578 

1579 

1580 000000 
1581 000002 
1383 Dp000s 
1584 0000! 
1585 000012 
1536 000014 
1587 


MACY11 30A(1052) 
GLOBAL EQUATES SECTION 


J 
25-JUL-80 





3 
10:29 PAGE 36 


;eteee INDEPENDENT EQUATES 


BUFLIM=512. 
MSGLIM=15. 


; MODE wf phe EQUATES 


LIS= 
;MAINT LOOP TYPE EQUATES 
NONE = 


0 
TTL= 1 
CABLE= 2 
MODLOC= 3 
MODREM= 4 
MOP= 5 


‘ BUFFER SIZE IN BYTES 

; APPLIES TO TX,RX AND CMP BUFFS 
:MAX NO. OF MESSAGES PER BUFFER 

; (FOR EACH INCREMENT (+1) TO MSGLIM, 
; ADD 6 WORDS TO THE POINTER TABLE 
;  (PTRTAB:) SINCE THIS MEANS 2 MORE 
;  ‘"POINTER'’ WORDS PER BUFFER. 


iRECEIVE MODE 


: MODE 
;DOWN-LINE-LOAD MODE 
; TALK MODE 

LISTEN MODE 


;NO LOOP 
SINTERNAL TTL 


:MODEM REMOTE 
;MOP 


CLOCK wie ® var yes TO BE LOADED IN CLK'S CSR 


PCLKEN= 111 
PCLKCT= 1600 


;PARAM WORD EQUATES 


STATB= BIT 
DATCKB= BI 


0 

11 

BIT2 

MOCHK= BI1T3 
CRCB= BI1T4 
PROTOB= BITS 


OPTION TYPE EQUATES 


DPV= 0 
sEVENT LOG MESSAGE TYPES 


sL=CLOCK CSR VALUE TO ENABLE THE CLOCK 
P-CLOCK CSR VALUE TO ENABLE THE CLOCK 
:P=CLOCK COUNT SET REGISTER FOR COUNTER 


OPERATOR AWAKE ASKED FOR 
DATA ah K BIT 


HO BIT 
"MODEM STATUS —. aw 
;CRC CALCUALTE ASKED FOR 
;PROTOCOL PROCESSING ASKED FOR 


;CODE FOR DPV CHAR MODE 


(USED TO LOCATE EVENT DESCRIPTION IN EVENT TABLE 


> AND Shee TO SEPERATE SECTIONS THE EVENT REPORTING SECTION) 


ps) 

= 

oO 

“ 
—— OE NMO 
reo 


; TRANSMIT MESSAGE QUEUED 


SEQ 0035 
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t's} 000016 MSC= 16 ;MODEM STATUS CHANGE 
1590 000020 DLE= 20 ;DATA COMPARISON LENGH ERROR 
1591 000022 DDE= 22 ;DATA se DATA ERROR 
1336 000024 FOP= 24 :END OF PASS 
1338 EQUATES FOR FLAG WORD 
1596 000001 ININT= B1TO ; INPUT INT. REC. 
1597 000002 OTINT= BI1T1 OUTPUT INT REC 
1598 000004 QRX= aite 3RX QUED /COMPL 
1599 000010 QTX= BIT 7 TX QUED/COMPL 
1600 000100 ERX= BIT6 sEXPECT TO GET A RX COMPLED 
Med 000200 ETX= B1T7 EXPECT TO GET A TX COMPLETED 
1603 
1604 000020 TXKM= BIT4 INDICATES TO TX INTERRUPT ROUTINE 
1605 ;THAT IT IS TIME TO TRANSMIT BODY OF MSG. 
1606 000040 RXM= BITS INDICATES "9 RX INTERUPPT ROUTINE 
1607 ;THAT IT IS TIME TO REC MSG BODY 
18 060400 BCC= BIT8 ;TIME FOR CRC CHECK. 
Hs b+ 001000 PAD= BIT9 ; INDICATES THAT PAD MUST BE SENT 
+ OS 002000 INOVR= B1T10 ; INIT OVER 
Hy 004000 FIRST= BIT11 sFIRST TIME FOR CTS 
1616 ; SPECIAL CLI CODES FOR ‘’CHAR’’ ARGUMENT IN CLI CALLS 
1617 ; (COMMAND LINE INTERPRETER DEFINITIONS) 
1618 090000 CLIERR= 0 
1619 000001 CLIEXI= 1 
1620 000002 CLIBR= 2 
1621 000003 CLIBIF= 3 
1622 000004 CLISPA= 4 
1625 000005 CLINUM= 5 
1624 000006 CLIALP= 6 
1625 000007 CLIALN= 7 
1626 000010 CLIOCT= 8. 
1627 000011 CLIDEC= 9. 
secs 000012 CLISTR= 10. 
$50 — LINE INTERPRETATION ACTION VALUES 
L 
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GLOBAL EQUATES SECTION SEQ 0037 


OPRMSG=15 


ATVMOD=27 
PASMOD=30 
RECMOD=31 
LISMOD=32 
DLLMOD=33 
TRAMOD=34 
TALMOD=35 


peewee DEVICE DEPENDENT a 

; MODEM SIGNAL BIT DEFINITONS 
IF SIGNAL AVAILABLE IN DEVICE, EQUATE NAME TO BIT POSITION, 
ELSE EQUATE IT TO = 0 


CTS= BIT13 CLEAR TO SEND (CIRCUIT CB) 

DSR= BIT9 sDATA SET READY (CIRCUIT CC) 

0CD= BIT12 ;DATA CARRIER DETECT (CIRCUIT CF) 

RTS= BIT2 yt i» TO SEND (CIRCUIT CA) 

Rl= BIT14 ;RING INDICATOR (CIRCUIT CE) 

SQD= BITS sSIGNAL QUALITY DETECT (CIRCUIT CG) 

TM= BITS ;MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 


1 ;DATA TERMINAL READY 

6 ;RECEIVER ENABLE 
5 ;DATA SET CHANGE ENABLE 
6 ;REC INT. ENABLE 


a 
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1700 000200 RDATRY= BIT? ;REC DATA READY 
1701 002000 RSTARY= BIT10 ;REC bh READY 
1702 004000 RXACT= BIT11 REC ACTIVE 

1703 0001 RESET= BI1TO :MASTER RESET 
1704 02 TXACT= BIT! ;™X IVE 

1705 000004 TBMT= site i 1X BUFFER EMPTY 
1706 000010 TTiLL= BIT :TTL LOOP BIT 
1707 000020 TXENA= BITS ;TX ENABLE 

1708 000100 TINTEN= BIT6 ;T™X INT ENABLE 
1709 00 OM= B1T8 ;TX START OF MSG 
1710 001000 TEOM= B1T9 ;TX END OF MS 
1711 100000 TERR= B1T15 ;TX ERROR 

ig 100000 RERR= BI1T15 ;REC OVER RUN 
itl? 000226 SYN= 226 SYNC WORD 


N 3 
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CLHA 25-JUL-80 10:26 GLOBAL DATA SECTION SEQ 0039 
715 -SBTTL GLOBAL DATA SECTION 

as | ~SBTTL DEFAULT MESSAGE DEFINITIONS AND TABLES 

1718 p++ 

1719 ; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 

1720 ; IN MORE THAN ONE TEST. 

1721 :-- 

1722 

We? ;MESSAGE BYTE COUNT TABLE 

1725 002150 DMSGCT: 

1726 002150 000001 WSGOC: .WORD EMSGO-MSGO ;BYTE COUNT OF MESSAGE #0 

1727 002152 000001 MSGIC: .WORD EMSG1-MSG1 BYTE COUNT OF MESSAGE #1 

1728 002154 000001 MSG2C WORD EMSG2-MSG sBYTE COUNT OF MESSAGE #2 

1729 002156 000001 mSG3C WORD EMSG35-MSG ;BYTE COUNT OF MESSAGE #3 

1730 1 100 MSG4C WORD EMSG4-MSG4 BYTE COUNT OF MESSAGE #4 

1731 002162 000072 MSGSC WORD EMSG5S-MSG5S ;BYTE COUNT OF MESSAGE #5 

1732 002164 000101 MSG6C: .WORD EMSG6-MSG6 BYTE COUNT OF MESSAGE #6 

1733 002166 000000 OPCNT: .WORD 0 BYTE COUNT FOR OPERATOR SPEC'D MSG. 

itt «4 002170 000001 MSG8C: .WORD EMSG8-MSG8 BYTE COUNT OF RECEIVE BUFFER FILL PATTERN 
i ;MESSAGE ADDRESS TABLE 

1738 002172 DMSGAD: 

1739 002172 002214 MSGO ADDRESS OF MESSAGE #0 

1740 002174 002215 MSG! ADDRESS OF MESSAGE #1 

1741 002176 002216 MSG ADDRESS OF MESSAGE #2 

174 005308 OOS ia MSG ZADDRESS OF MESSAGE #3 

1743 00220 220 MSG4 ADDRESS OF MESSAGE #4 

1744 002204 002320 MSG5 TADDRESS OF MESSAGE #5 

1745 002206 002412 MSG6 ADDRESS OF MESSAGE #6 

1746 002210 002520 OPBUF ADDRESS OF OPERATOR SPEC'D MSG. 

ee 002212 002642 MSG8 ZADDRESS OF RECEIVE BUFFER FILL PATTERN 
1749 002214 000 mSGO: BYTE 000 ;MESSAGE OF ALL O'S 

1750 002215 EMSGO: 

1751 002215 377 MSG}: .BYTE 377 MESSAGE OF ALL 1°S 

1752 002216 EMSG1: 

1753 002216 252 MSG2: .BYTE 252 7MESSAGE OF ALTERNATING 1°S 

1754 002217 praees 

1755 002217 125 MSG3: .BYTE 125 ;MESSAGE OF ALTERNATING 0°S 

He passeo EMSG3: ’ ts 

1757 002220 MSG4: -“CCITT’’ S12-BIT (VS. 511 BITS) TEST PATTERN 
1758 002220 177603 157427 031011 SWORD 177603, 157427,031011 047321, 163715, 105221, 143325, 142304 
1759 002 ¢¢ 047321 163715 105221 

1760 Bas 143325 142304 

1761 0022460 040041 oie 936606 LWORD 040041,014116,052606, 172334, 105025, 123754,111337, 111525 
17 002246 172 3 19306 123754 

1763 002254 111337 111523 

1764 002260 070 145064 137668 .WORD 030030, 145064, 137642, 143531 063617, 135075,066750,026575 
1765 Bs $6 143531 063617 15507 

HS Rae Hee BS 

1767 002 05201 27 070071 WORD 052012,053627,070071, 151172, 165044 031605, 166632 ,016741 
1768 002306 151172 165044 021605 

1769 pest tes 166632 016741 

1770 002320 EMSG4: 
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002320 


pp Ae yng) oJ 
QAOoOrVrFlao 


047045 
000122 


033 
002644 


040444 


020131 
077401 


021041 


040445 


TEST 


6 
047504 
077577 
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~N 
oa 


o 
w 
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— 
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w 
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DEFAULT MESSAGE DEFINITIONS AND TABLES SEQ 0040 


MSGS: tween eee TEST PROGRAM'S (ITEP)"' MESSAGE 
sASCII] <177><177>/$A THE Quick BROWN FOX JUMPED OVER THE LAZY D0G./ 


sASCIZ <15><€12><001><177><177><177><177> 

EMSGS: 

MSG6: sALPHA=NUMERICS (OR FUTURE COMM TURNAROUND MSG) 
ASCII /#$'"' B'C) tt - .0123456789:; ;<=>7@ABCDEF GHI JKLMNOPQRSTUVWXYZ/ 


SASCIZ -2/£\1*_%2 


EMSG6: 
-EVEN 


MEP RESERERESESERELESEREE ESE EERE REESE RSE SEER SAR ARR RRR RRR RRR RRR RRR R RAR ARES 


[THESE THREE STORAGE AREAS MUST NOT BE SEPERATED !!!! 


OPBFPT: .ASCII /%N%ZA/ 
ot no -BLKB 82. ;BUFFER FOR OPERATOR SPEC'D MESSAGES 


; THE ABOVE THREE LINES MUST BE KEPT TOGETHER 


3 PRR RSE SSESE SEES ERE EERERS ER ERE EEE ERE EER REESE RRR R RRR RRR RRA RAR RRR ADA D SD S| 


M°G8: BYTE 33 
EMSGB: 
VEN 


;RECEIVE BUFFER FILL PATTERN 
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co 
= 


©® CD OD CD CD CD C9 CD C9 CD CD CO CW OD 
MMPNIPININAN a eS Se 
NOUS IANO OONOu! 


et et ed td at ed 


28 


002654 
002656 
002657 
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002654 
000006 


000 
201 
000000 
001 
001 
001 
002666 


C 
MACY11 30A(1052) 25-JUL-80 1 
DEFAULT MESSAGE DEFINI 


eeseeeeeeseeeseeeeeeeeeeeeeeeeeeseeeseesseeeeeeeeeeeeseeeeeeese 


«THE FOLLWING 18 THE AREA USED TO’ TRANSMIT’ AND REC THE’; 
: HEADER MSGS. AND THE AS TARY, STACK ACK SEQUENCES. : 
HOMSG: BYTE 6 FILLER 

“BYTE 201 : SOH 
HDMCC: .WORD 0 ‘CHAR COUNT GOES HERE 

"BYTE 1 “RESPONSE NUMBER 

"BYTE 1 [MSG. NUMBER 

YTE 1 “ADDR TO. 

HSMSE 

EVEN 
HDMC: .WORD 6 
RHDMSG: .BYTE 0 

"BYTE 201 :SOH GOES IN HERE 
RHDMCC: .WORD “BYTE COUNT GOES HERE 

"BYTE 1 “RESP NUM 

"BYTE 1 [MSG NUM 

"BYTE 1 “ADDR TO. 

EVEN 


SEQ 0041 


| CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JuL-80- 10: 29 PA 


GE 43 
CVCLHA.P11 25-JUL=80 10:26 DEFAULT MESSAGE DEFINITIONS AND TABLES SEQ 0042 
\ee$ ; COMMAND LINE BUFFER, DATA LOCATIONS AND MESSAGES FOR ACTION ROUTINES 
1838 002666 000122 CMDBUF: .BLKB 82. ;BUFFER FOR OPERATOR COMMANDS 
1839 003010 000000 KEYWD1: .wORD 0 THIS LOC WILL =1 IF CLEAR TYPED, 2 FOR SHOW, 
1840 4 IF RUN WAS TYPED, 5 IF HELP wAS TYPED 
1841 003012 000000 QUALFG: .WORD 0 IT: LOC HOLDS QUALIFIER VALUE (SIZE OR COPY) 
1842 003014 000000 QUALVL: .WORD 0 
1843 003016 012077 HLPTAB: .WORD HLP1 
1844 003020 012112 «WORD HLP2 
1845 003022 012220 ~WORD HLPS 
1846 003024 01.305 ~WORD HLPS 
1847 003026 012364 ~WORD HLPGA 
1848 003030 012442 WORD LPS 
1849 003032 012532 WORD HLP6 
1850 003034 HLPEND: 
1851 003034 012665 012674 012701 SHTYTB: .WORD SHTYPO,SHTYP1,SHTYP2,SHTYP3,SHTYP4,SHTYPS, SHTYP6, SHTYP7 
1852 00 012706 012713 012721 
24 003050 612726 012734 
1855 ; THE LIST OF BYTES BELOW ARE THE FIRST BYTES OF THE PREDEFINED MESSAGES 
ts ; USED TO "’SMHOw'’ THE TRANSMIT AND COMPARE BUFFER CONTENTS. 


1858 003054 000 377 238 SHTAB: .BYTE 0,377,252,125,203,177,043 


1860 003062 04 

1861 003063 SHTEND : 

44 | 003064 N 

1864 003064 012745 MODES: .WORD M00 ;ADDRESSES OF MODE TYPES IN ASCII 

1865 003066 012755 WORD 01 

1866 003070 012766 -WORD MO2 

1867 003072 012776 «WORD M03 

1868 003074 01300 -WORD M04 

1869 003076 013022 -WORD M05 

H+ 4 003100 013027 WORD 

1872 003102 0130 LOOPS: .WORD LPO ADDRESSES OF LOOP TYPES IN ASCII 

1873 003104 013046 -WORD LPI 

1874 003106 013057 -WORD LP2 

1875 003110 013065 -WORD LP5 

H 003112 013100 -WORD LPS 

HH ; COMMAND LINE TRAVERSE LOCATIONS (USED By ‘PSTRV"") 

1880 003114 000000 PSBUFA: .WORD 0 ;LOC. TO HOLD ADDR. OF CMD LINE BUFFER 
1881 003116 000000 PSTREE: .WORD 0 ;LOC. TO HOLD ADOR. OF PARSING TREE 
1882 003120 000000 PSACT: .WORD 0 ;LOC. TO HOLD ADDR. OF ACTION ROUTINE 
1883 003122 000000 PSCNT: .WORD 0 ;LOC. TO BE A COUNTER LOCATION 

1884 003124 000000 PSNUM: .WORD 0 :L0 - TO HOLD NUMERIC VALUE FROM PARSE 
1885 003126 000000 PSRADK: .WORD 0 ;LOC. TO HOLD RADIX USED(LO) AND +/~(HI BYTE) 
1886 0031 000 PSNNUF: .BYTE 0 [RETURN =0 IF ENOUGH OF COMMAND FOUND 
1887 003131 000 P$GDBD: .BYTE 0 ;RETURN CODE 0 IF NO ERROR FOUND 
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000036 
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MESSAGE BUFFERS AND POINTER TABLES 
MESSAGE BUFFERS AND POINTER TABLES 


BUFLIM ; TRANSMITTER BUFFERS 

BUFLIM ;RECEIVER BUFFERS 

BUFLIM + COMPARISON BUFFERS 

MSGLIM*2- ; TABLE FOR MESSAGE ADDRS. & BYTE COUNTS 


SBTTL 

TXBuF BLKB 
RXBUF -BLKB 
CMPBUF: .BLKB 
PTRTAB: .BLKW 
PTR13 -BLKW 
PTR23: .BLKW 
PTREND: 

BLKW 
RXPTR: WORD 
TXPTR: WORD 
CMPPTR: .WORD 
CMPTOT: .WORD 
CTOTCC: .WORD 
CCURAD: .WORD 
DVTXA . WORD 
DVTCC WORD 
DVTCT ~ WORD 
TXMTOT: WORD 
TTOTCC: . WORD 
TCURAD: .WORD 
DVRKA «WORD 
DvRCC . WORD 
DVRCT: .WORD 
RXMTOT: .WORD 
LNCNT: WORD 
OPVAR: .WORD 
PSCNT: WORD 
ERRCNT: .WORD 
STADD: .WORD 
ENADD: .WORD 
BYTBIT: .WORD 
;OTHER MESSSAGE 
MSGTYP: . WORD 
CURCC . WORD 
CPTRR: WORD 
CPITR: WORD 
CURADD: .WORD 
TOTCC: .WORD 
OFSET: .WORD 
TEMP: . WORD 
TEMP! . WORD 
TEMP . WORD 
TEMP . WORD 
TEMPS: WORD 
TEMPS: WORD 
CONOTM: . WORD 


OoOoOoOCOoOOoOoO OC0OO0OO COOCOCOOO OCOCCOCOCOCOO rt 


; END OF MSG. PTR. TABLE 
SFILLER FOR OVERFLOW OF RX POINTER TABLE 


;RECEIVER MESSAGE POINTER 

; TRANMITTER BUFFER POINTER 

; COMPARISON BUFFER POINTER 

;CMP MSG TOTAL 

;COMPARE BUFFER CHAR. COUNT 
;CURRENT ADDR OF CMP BUFF TO ADD AT 


;DEVICE TX ADDR 

;DEVICE TX CHAR COUNT 

;DEVICE TX ~ eae COUNT 

:TX MSG TOTA 

:TX BUFFER CHAR. COUN 

TCURRENT ADDR. OF TX BUFF TO ADD AT 


DEVICE RX ADDR 

;DEVICE RX CHAR COUNT 
;DEVICE RX MESSAGE COUNT 
;RX MSG TOTAL 


;NUPBE® OF OPERATOR AWAKE MSGS 
:OP (TIONAL rentaes LOCATION 


SEND ADDR. FOR DUMP 
BYTE BIT FOR DUMP ROUTINE 


RELATED STORAGE LOCATIONS 


QoOoooooooo°o°oo 


; TYPE OF DATA 0=0°S,1=1°S,2=10°S, 3-01" 
4=CCITT,5= QUICK FOX, 6= A on 4 7=OPER 
STH/RK/ CAP CHAR COUNT 
; CURRENT RX POINTER 
; CURRENT POINTER 
CURRENT TX/RX/CMP START ADDD 
; TOTAL CHAR COUNT NOT MORE THEN ‘BUFLIM’ 
[OFFSET COUNT 
; TEMPORARY LOCATIONS (USED A LOT) 


; CONTROL OUT ERROR MSG. ADDRESS 


a a ——s—esi—‘“i<— CO 


SEQ 0043 
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19%5 006534 000000 CONTIN: .WORD 0 ;WORD FOR CONTROL IN 
1946 006536 000 GOOD: .BYTE Q :BYTE TO HOLD EXPECTED MESSAGE DATA BYTE FOR ERR REPORT 
bop 006537 000 BAD: BYTE 0 BYTE TO HOLD RECEIVED MESSAGE DATA BYT® £OR ERR REPORT 


SEQ 0044 
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CVCLHA.P11 25-JUL-80 10:26 MESSAGE BUFFERS AND POINTER TABLES SEQ 0045 
nds ;MORE INDEPENDENT CODE STORAGE LOCATIONS 
1951 006540 000000 LOGUNT: .WORD 0 ;LOC. TO HOLD LOGICAL UNIT he 
1952 006542 000000 PCADD: .WORD 0 ;LOC. HOLD PC OF CALLING ROUTINE 
1953 006544 000000 RESFLG: “WORD 0 :LOC TO HOLD FLAG (+1) THAT A RESTART WAS GIVEN 
1954 006546 000000 MODTYP: .WwORD 0 ‘DCLT MODE OF OPERATION TYPE 
1955 . grim ye 1=TX-ONLY, 2=PASS1YEL 00PBK. 
1956 ; SsaACTIVE~LOOPSK, 4=DOWN L.L.» S=TALK, 6=LISTEN) 
1957 006550 000000 MLTYP: .WORD 0 “MAINTENANCE LOOP TYPE (O=NONE, 1e]NTERNAL TTL, 
1958 ; 2=CABLE, 3=MODEM-ANALOG LOOPBK (LOCAL), 
1959 : 4=MODEM-DIGITAL LOOPBK (REMOTE), 5=MOP) 
1960 006552 000000 FYDPLK: .WORD 0 ;FULL OR HALF pyeven FLAG (1=FULL FROM P-TABLE) 
1961 006554 000002 PARAM: .WORD 2 ‘PROGRAM PARAMETERS 
1962 ; BITO= STATUS MSGS TO OPR PRINTED (1=YES) 
1963 : BIT1= DATA CHECKING DONE ON RCVD MSGS (1=YES) 
1964 ; BIT2= ECHO (TRANSMIT) RCV'D MSG. (PASSIVE) (1=YES) 
1965 : BIT3= MODEM STATUS CHECK (1=YES) 
1966 : BIT4= CRC CALC./CHECK DONE (1=YES) 
1967 : BITS= PROTOCOL EMULATION (1=YES) 
1968 ; BIT6= SPARE 
1969 006556 000000 RPASS: .WORD 0 :PASS NUMBER FROM RUN COMMAND 
bo 006560 000000 FLAG: «WORD 0 ;DEVICE FLAG WORD 
1972 :MODE DISPATCH TABLE 
1973 006562 027250 MODE : »WORD RXONLY ;RX ONLY DISPATCH 
1974 006564 027302 .WORD TXONLY ;TX ONLY DISPATCH 
1975 006566 027342 -WORD  PLCK PASSIVE LOOP BACK DISP 
1976 006570 027376 «WORD ALCK ACTIVE LOOP BACK DISP 
1977 006572 030556 «WORD DLL ;DOWN LINE LOAD DISP 
1978 006574 030602 .WORD TALCK ;TALK MODE DISPATCH 
ba 006576 031022 WORD LISCK sLISTEN MODE DISPATCH 
1981 
1982 .SBTTL CLOCK TABLES, ew LOG AND POINTERS 
1983 006600 000000 CLKCSR: .wORD 0 =CLOCK CSR ADDRESS 
1984 006602 000000 CLKBR: .WORD 0 sCLOCK INTERRUPT LEVEL 
1985 006604 CLKVEC: .WORD 0 =CLOCK INTERRUPT VECTOR 
1986 006606 000074 CLKHZ: .WORD 60. sCLOCK'S HERTZ RATE 
bs of 006610 CLKEN » WORD 0 sCLOCK'S CSR VALUE TO INTRPT. ENABLE IT 
1989 006612 000000 TIMMIN: .WORD 0 sPLACE TO KEEP TIME-SINCE-START 
1990 006614 000000 TIMSEC: .WORD 0 
\o02 006616 000000 TIMTCK: .WORD 0 ;PLACE TO KEEP # OF TICKS/SEC 
1993 006620 000000 TIMER]: .WORD 0 EVENT TIMER #1 (TICKS) 
1 006622 000000 TIMER2: .WORD 0 sEVENT TIMER #2 (TICKS) 
1995 006624 TIMERS: .WORD 0 EVENT TIMER #3 (SECONDS) 
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isterns LOG — AND ITS NEXT ENTRY POINTER 


;POINTER A, 1m FREE SPACE IN EVENT LOG 


EVENT LOG 


FER 
APPROXIMATE END OF EVENT TABLE (ALLOWS CIRCULAR QUE) 


MODEM DATA SECTION 


PTR: EVTLOG 
EVTLOG: “BLKW 225. 
EVTEND: .BLKW 1, 
~SBTTL 
MODS: «WORD 0 


;MODEM STATUS 


SEQ 0046 
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CVCLHA.P11 25-JUL=80 10:26 MODEM DATA SECTION SEQ 0047 
2007 
aie s TABLE OF MODEM SIGNAL BIT DEFINITIONS 
2010 007536 020000 MOBITS: .WORD (CTS :CLEAR TO SEND (CIRCUIT CB) 
2011 007540 001000 WORD DSR sDATA SET READY (CIRCUIT CC) 
2012 007542 010000 «WORD DCD sDATA CARRIER DETECT (CIRCUIT CF) 
2013 007544 000004 WORD RTS :REQUEST TO SEND (CIRCUIT CA) 
2014 007546 040000 WORD RI sRING INDICATOR (CIRCUIT CE) 
2015 007550 000040 -WORD $QD sSIGNAL QUALITY DETECT (CIRCU ) 
2016 007552 000040 .WORD TM :MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 
Ole 007554 MOBITE: 
ah : TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS 
2021 007554 015564 MOMSGS: .WORD EVMCTS CLEAR TO SEND (CIRCUIT CB) 
2022 007556 015570 «WORD EVMDSR , :DATA SET READY (CIRCUIT CC) 
2023 0075 015574 WORD €EVMODCD :DATA CARRIER DETECT (CIRCUIT CF) 
2024 007562 015600 WORD EVMRTS sREQUEST TO SEND (CIRCUIT CA) 
2025 007564 015604 WORD EVMRI sRING INDICATOR (CIRCUIT CE) 
2026 007566 015610 WORD EVMSQD :SIGNAL QUALITY DETECT (CIRCU G) 
see 007570 015614 WORD EVMTM [MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 
2029 TABLE OF ADDRESSES OF EVENT DESCRIPTION MESSAGES 
on 3 ORDER CORRESPONDS TO MESSAGE TYPE VALUES 
2032 007572 014202 EVTLST: .WORD EDTXQ ;TRANSMIT MESSAGE QUEUED 
2033 007574 014226 WORD EDTXC ;TRANSMIT OF MESSAGE COMPLETE 
2034 007576 014253 "WORD EDRXQ  :RECEIVE MESSAGE SPACE QUEUE 
2035 007 014302 "WORD EDRXC : MESSAGE RECEIVED = RECEIVE O OMPLE TE 
20 007602 014330 "WORD EDDER DEVICE INFORMATION 
2037 007604 014375 "WORD EDDVI DEVICE INITIALIZE STARTED 
007 014345 .WORD EDDCK ;DATA COMPARISON DONE 
2039 007610 014527 "WORD EDMOS :MODEM STATUS CHANGE 
2040 007612 014423 "WORD EDDLE :DATA COMPARE LENGTH ERROR 
2041 007614 014460 “WORD EDDDE  ;:DATA COMPARE DATA ERROR 
soe 007616 014513 WORD EDEOP ;END OF PASS 
cose LOCATIONS USED DURING EVENT REPORTING 
2046 007620 000000 EVTSEC: .wORD 0 TEMPORARY LOCS TO KEEP EVENT TIME WHILE REPORTING 
7 007622 000000 EVTMIN: .WORD 0 
2048 007624 000000 EVTTCK: .WORD 0 
2049 007626 000000 EVTADD: .wORD 0 ;TEMP, LOC. TO HOLD ADDRESS DURING EVENT REPORTING 
007 000000 EVTBCT: .wORD 0 : ‘ "BYTE COUNT =" rs o 
3051 007632 000000 EVITMP: .WORD 0 $ ‘* OTHER DATA ‘ 
2058 REPORT CODING DISPATCH TABLE 
55 007634 020116 RPTDSP: .WORD RPTTXQ ; TRANSMIT QUEVED ENTRY DECODING 
36 007636 020116 WORD RPTTXQ ; TRANSMIT COMPLETE ENTRY DECODING 
57 007640 020116 WORD RPTTXQ ;RECELVER QUEVED ENTRY DECODING 
SB 007642 0116 WORD RPTTAQ [RECEIVER COMPLETE ENTRY DECODING 
59 007644 0170 .WORD RPTDER ;DEVICE ERROR ENTRY DECODING 
007646 020264 .WORD RPTIDVI ;DEVICE INIT ENTRY DECODING 
1 007650 020460 WORD RPTDCK ;DATA COMPARISON ENTRY DECODING 
2062 007652 020534 WORD RPTMSC ;REPOR] MODEM STATUS CHANGE 





—_—_——_————————— tse esa nn 
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CVCLHA.P11 25-JUL-80 10:26 MODEM DATA SECTION SEQ 0048 
2063 007654 020460 -WORD RPTDLE ;DATA COMPARISON LENGH ERROR 
2064 007656 020404 «WORD RPTDDE ;DATA COMPARISON DATA ERROR 
soe? 007660 020330 -WORD RPTEOP ;END OF PASS 
2067 
2068 007662 000000 DEVi: .WORD 0 ; TEMP LOCS TO HOLD DATA FOR EVENT REPORTING 
2069 007664 000000 DEV2: .WORD 0 ; AND SHOW MODE,... SUBROUTINE 
2070 007666 000000 DEVS: .WORD 0 
2071 007670 000000 DEV4: .WORD 0 
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COMMAND LINE ACTION TREE 


20/3 SBTTL COMMAND LINE ACTION TREE 
484 ; SAMPLE Cul TREE NODE (ALWAYS AT LEAST 1 WORD) 
2077 ; ! ACTION ! CHAR CODE ! 
44 3% “MISS DISPLACEMENT. ONLY IF "MISS'’ ARGUMENT DEFINED 
2081 > ! NEXT NODE DISPLANT |! ONLY IF "ASCII" ARGUMENT DEFINED 
2083 : ! ASCIZ MATCH STRING ! ONLY IF “'ASCII' ARGUMENT DEFINED 
2084 . | (EVEN) ! 
2085 S eececece suvenacsencesse 
2086 
2087 
2088 007572 CLITRE: 
2089 
2090 FIRST KEYWORD 
2091 007672 Cul CLISPA,O,N10$ :SkIP ANY LEADING SPACES 
2092 007676 N10$: CLI <'2>,HLP.NG2S ‘1S THE FIRST NON-SP CHAR A ‘'?" 
2093 007702 Cul CLIEKI,0 : IF YES DO “WLP” AND EXIT 
209% 007704 NO2$: CLI CLISTR.HLP,NG3$,<"HELP’> “ELSE, IS FIRST WORD A ‘HELP’ 
2095 007720 Cul CLIEXI.0 : JF YES DO WLP’ AND EXIT 
2096 007722 NG3$: CLI CLISTR,PRNT,N45$,<'PRINT'> sELSE. IS FIRST WORD A ‘PRINT’ 
2097 007736 C.l CLIEXI.O > IF YES DO ‘PRINT’ AND EXIT 
2098 007740 NOS$: CLI CLISTR.RUN,NGO$,<"RUN'> TELSE, IS FIRST WORD A ‘'RUN’ 
2099 007752 CLI CLIBR,0,N8 TF YES DO. RUN & GOTO N80S 
100 775 NGOS: CLI CLISTR,NOTNUF .N4OS,<"DUMP'> “ELSE, IS FIRST WORD A "DUMP 
101 00777 Cul CLIBR,6,N5SO ;_ IF YES GOTO N80S 
2102 007776 NGOS: CLI CLISTR, éLean, N208 <"CLEAR"> TELSE, 1S FIRST WORD A “‘CLEAR’ 
2103 010012 CLI CLIBR,NOTNUF .N100$ : IF YES ‘CLR'' & GOTO N100$ 
2104 010016 N20$: CLI <*$> ,NOTNUF , F asos TELSE, 15 FIRST CHAR. A'S 
2105 010022 CLI CLISTR, SHOW,N25$,<"HOW'> : IF YES IS REST OF WORD ‘HOw’ 
2106 010036 CLI CL 1BR,6, 1008 i. LF VES. DO "SHOW BR N1008 
2107 01004 N25$: CLI CLISTR,O.N30$,<"ET’> > ELSE, IS REST, 0 F WORD “ET 
2108 010052 CLl CLIBR,O,N110$ IF YES, DO “SET, BR NI10$ 
2109 010056 N30$: (CLI CLIERR,O “OTHERWISE ute CMD’ = EXIT 
a :SECOND KEYWORD (MODE=) FOR RUN COMMAND 
sii8 010060 N80$: CLI CLISPA,0,N30$ :SKIP LEADING SPS. If, NONE~ERR 
2116 010064 N81$: CLI cLAstR. NOTNUF N30$,<"MODE "> 1S NEXT WORD 
2115 010100 CL! $ ; TF NO, IT'S WRONG ERR -EXIT 
2116 010104 CLI curste’ AiVRoo, NB2$,<"ACTIVE'> 1S NEXT WORD “ACTIV 
2117 010122 CLI CLIBR, m1 mit ; IF YES, DO “ACTIVE ,BR N115$ 
118 010126 n82$: CLI CLIST D.N83S.<* PASSIVE" > IIS NEXT WORD "PASSIV 
119 010144 CLl CLIBR ap Nit : IF YES, 00 “PASSVE', BR NI15S 
120 010150 N83$: CLI — CLISTR RECRODNB4$,<"RECEIVE'> :1S NENT woRD “RECEIVE 
121 010166 CLI CL1BR.O,N11 IF YES, DO “RECVE'.BR NI15$ 
1 Q 010172 N846$: CLI CLISTR,LISMOD.NB5SS,<"LISTEN’> 31S NeXT Goro “LISTEN” 
1 910210 CLl CL1eR,6,N11 YES, DO LISTEN BR NI15$ 
124 910216 ness: CLI CLISTR sPLLvon. n86S, <*DOWNL INELOAD* > :1S NEXT WORD “D 
125 010240 C.l CL ier, 6 ; ves, D0 A BR NiiSS 
126 010246 BOS: CLI —s <*T>, 0,308 tis NEXT CHAR a 
127 010250 Cul CLISTR. TRAMOD .NB7$,<"RANSMIT'> ; IS REST OF vane” “"RANSMIT 
128 010266 CLI etter OUNtT S$ : TF YES, DO 'TRANSM’'.BR NI15$ 


SEQ 0049 
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CVCLHA.P11 =. 25=JUL-80 10:26 COMMAND LINE ACTION TREE SEQ 0050 
129 010272 N87$: CLI CLISTR TAL MOD ,N30$,<"ALK'> : IS REST OF WORD “‘ALK’ 
5180 010804 CL1 CLR, 6 i Te YES, DO-TALK'SBR N115$ 
3131 : IF NO, ERROR = EXIT 
2133 ; SECOND KEYWORD (FOR CLEAR OR SHOW) 
2134 010310 N100$: CLI CLISPA,O,N ;SKIP LEADING SPACES, NONE =ERR, 
2135 010314 N1028, CLI CLISTR CSHEXP,NI0G$,<"EXPECTBUFF > :1S NEXT WORD "EXPE...° 
2136 010336 CLI CLIEXI.0 IF YES, DO CLRoEXP, “EXIT 
2137 010340 N104$: CLI CLISTR.CSHTRN,N30$,<* TRANSMI TBUFF '> [1S NEXT WORD "TRA 
2138 010364 CLI CLIEKI.O IF Wes: DO CURT, EXIT 
2139 SIF NO = ERROR = EXIT 
2140 
2141 
2142 :SECOND KEYWORD (FOR set) 
2143 010366 N110$: CLI CLISPA,0,N30$ 
2144 010372 NI11$: CLI CLISTR SETEXP. N112$,<"EXPECTMSG'> 
2145 010412 CLI CLIBR, 
2146 010416 N112$: CLI CLISTR SETTRN, N30$,<* TRANSMITMSG"> 
ier 010440 Ctl CLIBR,O,N120$ 
2149 GET ADDRESSES FOR DUMP COMMAND 
2150 010644 $: CLI CLIALP,O,NS1$ 
2151 010450 NS1$: CLI CLISPA.0.N52$ 
2152 010454 N52$: CLI CLIOCT _DMPS ,N30$ 
2153 010460 CLI <'=>, NOTNUF .N125$ 
2154 010464 CLI CL1ocT, DMPE .N30$ 
2155 010470 CLI <'/>, NOTNUF .N125$ 
2136 010474 CLl <'B> DMPO N508 
e157 010500 Ctl CLIBR,O,N{2 
2159 SQUALIFIERS FOR THE RUN COMMAND 
2160 010504 N115$: CLI CLIALP,O,N114$ 
2161 010510 N114$: CLI <*/>, NOTNUF ,N125$ 
2162 010514 CL! chIstR. NO,N116$,<'NO'> 
2163 010526 N116$: CLI <*C>,0.N117$ 
2164 010532 Cul CLIStR, CHECK N117$.<"HECK"> 
2165 010546 CLI CLIBR,O,N115$ 
$189 
2168 010552 N117$: CLI CLISTR, STATUS ,N118$,<"STATUS'> 
2169 010570 C.l CLIBR,O,N115$ 
170 010574 N118$: (CLI CLISTR,ECHO,N130$,<°ECHO'> 
2171 010610 Cul CLIBR,O,N115$ 
2172 
173 
17% 
175 010614 N130$: CLI CLISTR,O 1326, <*PASS*> 
17% 010630 c.l CL18R,6,N150 
iH 
179 010636 N132$: CLI CLISTR,MOSC .N131$,<"MODEM’ > 
010650 CLl CL1BR,6,N115$ 
182 010654 w131$: CLI CLISTR 308, <*LOOP*> 
183 010670 Cul CLIBR sn, 
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COMMAND LINE ACTION TREE SEQ 0051 


;GET MESSAGE we — SET MESSAGE COMMANDS 
208: CLI =>,0,N308 


i ae FOR DEFAULT sar taent NAME 


60 CLI CLISTR,CMSG1,N61$,<' ONES '> 
CLI CLIBR ¥ Ni21 
N61$: CLI CLISTR énsGo N62$,<'ZEROES'> 
CLI CLIBR,O,N121 
N62$: CLI CLISTR, CMSG2,N63$,<'TALT'> 
CLI CLIBR,6,N121 
N63$: CLI CLISTR,CMSG3,N64$,<"OALT'> 
CLI CLIBR cN 
N64$: CLI CLISTR,CMSG5,N6S$,<'ITEP'> 
CLI CLIBR. qi 
N65$: CLI CLISTR, CMSG4,N66$,<'CCITT'> 
Cul CLIBR,O,NI21$ 
NO6$: CLI CLISTR, CMSG6,N67$,<" ALPHA’ > 
CLI CLIBR,O.NI21$ 
: LOOK FOR QUOTED MESSAGE 
NO7$: CLI <*> OPRMSG,N30S 
N70$: (CLI <"'>ENDQO,N71$ 
CLI CLIBR,O,NI21$ 
N71$: CLI CLISPA.O.N72S 
N72$: CLI CLIALN,O Ae N73 3 ZONLY A=Z,SP,TAB, OR 0-9 BETWEEN ‘"'S 
N73$: CLI CLIER SSaatan :PRINT ERROR IF NONE LEGAL CHAR FOR ‘"'S 
:GET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS 
N121$: CLI CLIALP,O, 123s 
N128$: (CLI <'/>, NOTNUF ,N125$ 
Cul CLISTR, SLZE.N122$,<'SIZE"> 
CLI CLIBR,O,N1 
N1228: (CLI CLISTR, QCOPY,N30$,<"COPY'> 
CL! CLIBR,O,N126$ 
:NUMER FOR SIZE OR copy 


N126$: CLI <'=>,0,N30$ 
cil cL ipee: We N308 
CLl CLIBR,O,N1218 


pGet MAINTENANCE of TYPE FOR RUN "‘LOOP’’ QUIALIFIER 
1408: CLI $ 


<‘=>, oN 


N161$: CLI CLISTR TTLLOP .N1428, <* INTERNALTTL "> 
CLI CLIBR $ 

N1628: (CLI CLIsTa eSLLOP, N143$,<" CABLE "> 
CL! CL1BR,O,N115$ 

N143$: CLI CLISTR CHDL OP, N144$,<"LOCALMODEM' > 
CL! CLIBR $ 

N164$: (CLI CLIsta no. . N30$,<"REMOTEMODEM® > 
ae CLIBR 

:GET LINE NUMBER FOR “'PASS’ RUN QUALIFIER 

Nl $: CL! <'s>,0.N $ 


| 
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COMM 


AND LINE ACTION TREE 


CLI CLIDEC,PASC,N30$ 
CLI CLIBR,O,N115$ 

: END=OF =LINE 

N125$: CLI CLIEXI,0 


SEQ 0052 


' 
~ad 















B 5 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 54 
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2249 
2250 
2251 DEVICE DEPENDENT STORAGE LOCATIONS FOR 
2252 + CURRENT DEVICE PARAMTERS 
52, 
2255 011344 000000 RXCSR: .WORD 0 REC CONTROL AND STATUS 
2256 011346 000000 PCSAR: .WORD 0 ‘STATUS REGISTIER 
2257 011350 000000 RDSR: .WORD 0 REC DATA AND STATUS REG 
2258 011352 000000 TXCSR: .WORD 0 ; TRANSMIT AND REC. CONTROL 
54 011354 000000 TDSR: .WORD 0 TRANSMIT DATA AND STATUS REG 
2261 
2262 011356 000000 INVEC: .WORD 0 ; INPUT INTERRUPT VECTOR ADDRESS 
2263 011360 000000 OUTVEC: .WORD 0 sOUTPUT INTERRUPT VECTOR ADDRESS 
2264 011362 000000 INTPRI: .WORD 0 s INTERRUPT PRIORIT 
ssoe 011364 000000 OPTYP: .WORD 0 ‘DEVICE OPTION TYPE (Oe DMC,5=DMR-DMC MODE 
2267 011366 065626 DPVP1: .WORD 065626 THIS WORD IS BROKEN DOWN AS FOLLOWS 
2268 ‘BITS 0-7 =SYNC WORD 
2269 BITS 8-10=ERR DET SELECTED 
2270 :THIS IS SET TO SYNC 262 sBIT11 = IDL 
2271 sCRC 16 INIT TO 1 ;BIT12 = SEC Adon. MODE 
2272 STRIP SYNC AND BCP MODE ;B1T13 = STRIP 
2273 ; IDLE SET TO MARK :BIT14 = PORTO TYPE SEL(1=BCP 0=BOP) 
2274 :BIT15 = ALL PARTIES ADDRESS.. 
011370 000000 CMODS: .WORD 0 ;CURRENT MODEM 
2278 011372 000000 IRXCSR: .WORD 0 >; IMAGE OF RXCSR 
2279 011374 000000 IRDSR: .WORD 0 ; IMAGE OR RDSR 
2280 011376 000000 MSGPTR: .WORD 0 ‘MSG PTR.FOR HEADER OR CONTROL 
2281 011400 000000 MSGCC: .WORD 0 :MSG COUNTER OR CC 
2282 011402 000000 SYNCC: .WORD 0 SYNC CHAR COUNT. 
2283 011404 000000 SYNCW: .WORD 0 ‘SYNC WORD.PLUS TSOM BIT. 
22 011406 000000 RMSGPT: .WORD 0 MSG PTR FOR REC 
2285 011410 000000 RMSGCC: .WORD QO ;CHAR COUNTER FOR REC 
22 011412 000000 BCCW: .WORD 0 CRC HOLDING LOC. 
2287 011414 000000 MGLCNT: .WORD 0 ;COUNT OF GLITCH ERRORS 
22 011416 000000 MHRCNT: .WORD 0 COUNT OF HARD ERRORS 
sou 011420 000000 RNODE: .WORD 0 ;1=REMOTE NODE ITEP,O=NON ITEP 


ERRTBL 


Mror 
horn 
SSESEAE ~ re 





CVCLiWA.P11 


011462 


050104 
000 
011432 


050104 


052123 


25-JUL-80 10:26 


026526 


026526 


000040 





CVCLHA DPV-11 DATA COMM. LINK TEST 


030461 


030461 


042524 


. 3 
MACY11 30A(1052) 25=JUL-80 10:29 PAGE 55 
GLOBAL TEXT SECTION 


-SBTTL GLOBAL TEXT SECTION 
5*® 
; THE GLOBAL TEXT 


; MESSAGES, AND A 
; MORE THAN ONE TEST 


ON CONTAINS FORMAT STATEMENTS, 
NFORMATION THAT ARE USED IN 


DEVICE SUPPORTED 
> NAMES OF DEVICES SUPPORTED BY PROGRAM 


-SBITL PROCRAM IDENTIFICATION 
; TEST DESCRIPTI 


<DPV-11 DATA COMM LINK TEST > 


SEQ 0054 


eASCIZ = /DPV=11/ 
-EVEN 


eASCIZ /DPV-11 DATA CUM 


-EVEN 





d 5 
CVCLHA DPV¥-11_ DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 56 


CVCLHA,P11 25-JUL-80 10:26 GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO SEQ 0055 
saa .SBTTL GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 
2332 
2333 611466 0415046 052114 000076 CLISPM: .ASCIZ /DCLT>/ 

2334 011474 047045 0404645 044477 CLIERM: .ASCIZ /2NZA7ILL CMD-BAD SYNTX?/ 
2335 011502 0466114 041440 042115 

2336 011510 04 042101 051440 

2337 011516 047131 054124 000077 

2338 ABE: 047045 040445 044477 CLINUF: .ASCIZ /2NZA?INCMPLTE CMD?/ 

2339 011532 041516 050115 052114 

2340 011540 020105 046503 037504 

2341 011546 

2342 011547 045 022516 037501 CLINBG: .ASCIZ /2NZA?NUM TOO B1G7/ 

2343 011554 052516 020115 047524 

2344 911562 020117 044502 037507 

2345 011570 000 

2346 011571 045 022516 037501 CLIBRX: .ASCIZ /%NXA?BAD RADIX?/ 

2347 011576 040502 020104 040522 

2348 011604 044504 037530 000 

2349 011611 045 022516 037501 CLIBDL: .ASCIZ /%NZA?''LOOP’’ VALID ONLY IN ACTIVE?/ 
2350 011616 046042 047517 021120 

2351 011624 053040 046101 042111 

2352 011632 047440 046116 020131 

2353 011640 047111 0404 052103 

2354 011646 053111 037505 000 

2355 011653 045 022516 037501 CLINPS: .ASCIZ /%N%A?°ECHO'’ VALID ONLY IN PASSIVE?/ 
2356 011660 042442 044103 021117 

2357 011666 0 0 046101 042111 

2358 011674 7440 046116 020131 

2359 011702 047111 050040 051501 

2360 011710 044523 042526 000077 

2361 011716 047045 040445 0464477 CLIBCR: .ASCIZ /%NZA7ILL CHR ‘'A-72,0-9,SP,TAB’’ ONLY?/ 
2362 011724 046114 041440 051110 

2363 011732 020055 040442 055055 

2364 011740 030054 034455 051454 

2365 011746 026120 040524 021102 

2366 011754 047440 046116 037531 

2367 011762 000 

2368 011763 045 022516 037501 CLISEO: .ASCIZ /2NRZA?''S1ZE=0"° NOT VALID?/ 
2369 011770 051442 055111 036505 

2370 011776 021060 047040 052117 

2371 012004 053040 046101 042111 

2372 012012 000077 
2373 012014 047045 040445 044124 HLPO: ASCIZ «/2NZATHIS IS DCLT. TYPE ‘'H'' OR ''?"' FOR DETAILS/ 
2374 012022 051511 4440 020123 

2375 012030 041504 052114 020056 

2376 012036 054524 pot $48 021040 

2377 012044 getiig 047440 020122 

2378 012052 037442 020042 047506 

2379 012060 020122 042504 040524 

2380 012066 046111 000123 

2381 O1c07s 047045 052045 000 HLPF: ASCil = /ENRT/ 

2 01207 104 046103 020124 HLPI: eASCIZ = /DCLT CMDS:/ 

2383 012104 046503 051504 000072 

2384 012112 041440 042514 051101 HWLP2: ASCII] 7/ CLEAR OR SHOW EXPECTLIST OR TRANSMITLIST/<15><12> 
2385 012120 047440 020122 044123 


re 
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CVCLHA.P11 25-JUL-80 10:26 GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO SEQ 0056 


2386 A 053517 020040 054105 

2387 0121 042520 052103 0464514 

2388 012142 052123 047440 R20 lge 

2389 012150 051124 047101 04652 

2390 012156 052111 044514 052123 

2391 012164 005015 

2392 012166 050040 044522 052116 ASCII = / PRINT/<15><12> 

2393 012174 005015 

2394 012176 042040 046525 020120 .ASCIZ 2? DUMP START-END/B? 

2395 012206 052123 051101 026524 

2396 012212 047105 027504 000102 

2397 012220 051440 052105 042440 +'P3: ASCIZ) 2? SET EXPECTMSG OR TRANSMITMSG=TYPE/SIZE=N OR /COPY=N? 
2398 012226 050130 041505 046524 

2399 012234 043523 047440 020122 

2400 012242 051124 047101 046523 

2401 012250 052111 051515 036507 

2402 012256 054524 042520 051457 

2403 012264 055111 036505 020116 

2406 012272 051117 027440 047503 

2405 012300 054520 047075 

406 012305 040 020040 054524 HLPé: -ASCIZ 2? = TYPE=ONES,ZEROES,1ALT,OALT,ITEP,CCITT, ALPHA? 
2407 012312 042520 047475 042516 

2408 012320 026123 042532 047522 

2409 012326 051505 030454 046101 

2410 012334 026124 040460 052114 

2411 012342 044454 042524 026120 

2412 012350 041503 052111 026124 

2413 Og 56 046101 044120 000101 

2414 01 020040 020040 020040 HLP4A: .ASCIZ / OR "‘OPR SPCD=A-72,SP,TAB,0-9 IN QUOTES’ 
2415 012372 04 020122 047442 

2416 012400 051120 051440 041520 

2417 012406 026501 026132 

2418 012414 050123 052054 041101 

2419 012422 030054 034455 044440 

2420 012430 020116 052521 052117 

2421 012636 051505 000042 

2422 012442 0510460 047125 046440 HLPS: .ASCIZ ? RUN MODE=MTYP/LOOP=LTYP/CHECK,STATUS,ECHO,MODEM,PASS=N? 
2423 012450 042117 036505 052115 

2424 012456 050131 046057 047517 

2425 0124664 036520 052114 050131 

2426 012672 041457 042510 04550 

2427 012500 051454 040524 052524 

2428 012506 026123 041505 047510 

2429 012514 046454 042117 046505 

2430 ots 38e 050054 051501 036523 

2431 0125 000116 

2432 012532 020040 046440 054524 HLP6: ASCII] / MTYP=TRAN,REC, ACT, PAS, TAL,LIS,DOWN/<15><12> 
2433 012540 036520 051124 047101 

2434 012546 051054 041505 040454 

2435 012554 052103 050054 051501 

2436 012562 052054 046101 046054 

2437 012570 051511 042054 053517 

24638 012576 006516 012 

2439 012601 040 020040 052114 AASCIZ) / ~~ LTYP=INT,CAB,LOC ,REM/ 
2440 012606 050131 044475 052116 

2441 012614 041454 041101 046054 







CVCLHA DPV=11_ DA‘A COMM. LINK TEST 
CVCLHA.P11 25-JUL-80 10:26 


2442 012622 val? 051054 046505 


2444 

2445 012631 022516 046501 
2446 26 043523 020072 054524 
2447 2644 042520 022475 022524 
2448 2652 027501 044523 042532 
2449 2660 022475 (671504 000 
2450 2665 132 051105 042517 
2451 672 000123 

2452 2674 047117 051505 

2453 2701 0 046101 000124 
2454 2706 040460 052114 00 
2455 713 103 044503 052124 


721 111 042524 009120 
046101 044120 000101 
y50117 020122 050123 


~ 

= 

a 

™~m 
SOOCCOCOCOOOCOCOCOCOOCOCOSCC COOOCOCOOCOCOOOCOCOoOOoOoOoOOOo 


ee ee ee es 8 od ot td 
Nm 


2 

2 

2 

2726 

2734 
2440 012742 041505 000 
2461 Vie745 122 041505 044505 

2752 042526 000 
2663 012755 124 040522 051516 
2464 012762 044515 000124 
2465 012766 040520 051523 053111 
2466 012774 000105 
2467 012776 041501 044524 042526 
2668 013004 
2469 013005 104 053517 046116 
2470 013012 047111 046105 040517 
2471 013020 000104 
2672 013022 040524 045514 000 
2473 013027 114 051511 042524 
2474 013034 000116 
2475 013036 = 00 
2676 013037 «057047514 050117 
2477 013044 000075 


3046 047111 042524 047122 
000 


2479 +013054 046101 

2480 013057 041101 042514 
2481 013064 000 

2482 013065 114 041517 046101 
2483 013072 047515 042504 000115 
2484 013100 042522 047515 042524 
2485 013106 047515 042504 000115 
2486 013114 047516 

2487 013116 052123 052101 051525 
2488 013124 000 

24689 013125 116 117 

2490 013127 103 042510 045503 
2491 013134 000 

2492 013135 116 117 

2493 013137 105 044103 000117 
2494 013144 047516 

oh 013146 047515 042504 000115 


_ 
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GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


SHMSG: .ASCIZ 2RNZAMSG: TYPE=%T2A/SIZE=203? 


SHTYPO: .ASCIZ /ZEROES/ 


SHTYP1: .ASCIZ /ONES/ 
S4TYP2: .ASCIZ /1ALT/ 
SHTYP3: .ASCIZ /OALT/ 
SHTYP4: .ASCIZ /CCITT/ 


SHTYP5: .ASCIZ /1TEP/ 
SHTYPG .ASCIZ = /ALPHA/ 
SHTYP7: .ASCIZ /OPR SPEC/ 


MOO: eASCIZ /RECEILVE/ 
M01: eASCIZ /TRANSMIT/ 
MO2: eASCIZ = /PASSIVE/ 
M03: eASCIZ /ACTIVE/ 
M04: eASCIZ /DOWNLINELOAD/ 
MOS: eASCIZ = /TALK/ 

M06: eASCIZ /LISTEN/ 
LPO: eASCIZ // 

LPOO: eASC1Z ?/LOOP=? 
LP1: -ASCIZ 7INTERNAL? 
LP2: -ASCIZ ?CABLE? 

LP3: -ASCIZ ?LOCALMODEM? 
LP4: -ASCIZ ?REMOTEMODEM? 
PNST: eASCII = /NO/ 

PST: eASCIZ = /STATUS/ 
PNCK: ASCII = /NO/ 

PCK: eASCIZ = /CHECK/ 
PNEC: ASCII = /NO/ 

PEC: eASCIZ = /ECHO/ 

PNMS: eASCII = /NO/ 

PMS: ASCIZ /MODEM/ 


SEQ 0057 






2498 

2499 013154 047045 

2500 013162 037123 

2501 013165 124 

2502 013172 044124 
OF 013200 032440 
04 013206 020122 
05 013214 055110 
GO, 013222 026511 


013230 047045 


2 
013302 053105 


047045 


POMIPIPOPOPOPO PONY 2 SS SS SS S| COCOO 


IWAANG 
{SSSSFAFUNLSSSNSORUN LS Swe ARAN HOSS Ne 
NEO 
- 
w 
— 
~N 


teh peed epeped 
ww yuvao= 
oor 

to 

oon 

-—-—O 

-—Oof 

Wru 


Seaapeanes 
= 
uw 
~ 
™~ 


iw 
~ 
~ 
zg 
™~ 
= 
oO 
—_ 


ie cence rnaamatehatsahetahstale st 26 bb ab 6d tees 
Sw 


PIPIPOPIAPIAIPI NIP NINN PIPE NINIMIPI PIP NMI NPS POMPOM PPO RPE Pere Po rore nen nore 


FEFSEESES SESS 


ee ee ee ee ee et et ot ot ot 
SSASLUNES SLATS 
z 
~™ 
ws 
o 
a 


SOSCSCSOOCOSCOCCOCOCOOCOOCOOCOOOoOoCoOoOoCoOCoSoOo 


Ant 
PAPAIN 
mn 
enue 

S 

So 

= 

as 


047045 


040445 
0 


030461 


040445 


041511 


040445 
020113 
047506 


040445 
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044514 
000076 


000072 


047504 


000105 


046103 
047516 
047125 


040502 


020441 
020056 


042105 


042506 
046114 


022524 


020440 
044103 





MACY11 30 
G 


LISP: 


OPRMM: 
15060: 


> FORMAT 


DLLCM: 


BDCLK: 


NOCLK: 


TABEX: 


BUFEX: 


MSGTRN: 


MSGTRU: 


A(1052) 


G 5 
25-JUL-80 10:29 PAGE 59 


LOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


-ASCIZ 


AS LIZ 


EVEN 


/ENZALIS>/ 


/TLK>/ 
/THIS A 50. OR 60. HZ. LSI=11:/ 


STATEMENTS USED IN PRINT CALLS 


eASCI2 


-ASCI2 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/ZNZADOWN LINE LOAD NOT SUPPORTED BY THIS DEVICE/ 


/ENZACLOCK NOT FOUND/ 


/ZNZABAD CLOCK = PROGRAM WILL HANG ON ‘'TIMEQUT"'! !/ 


/MAX, CHAR. MSG COUNT EXCEEDED -/ 


/BUFFER FULL =-/ 


/ENZTZA MSG. NOT BUILT !'/ 


/ENZACHAR. COUNT EXCEEDS BUFF LIMIT = MSG TRUNCATED/ 


SEQ 0058 

















CVCLHA DPV-11 DATA COMM. LINK 
CVCLHA.P11 25-JUL-80 10:26 


H 5 
TEST MACY11 gy iia’ 25-JUL-80 10:29 PAGE 


60 
LOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO SEQ 0059 


2554 013532 051101 020056 047503 

2555 013540 125 020124 054105 

2556 013546 042503 042105 020123 

2557 013554 052502 043106 046040 

2558 013562 046511 052111 026440 

2559 013570 046440 043523 052040 

2560 013576 052522 041516 052101 

2561 013604 042105 000 

2562 013607 045 022516 032525 SHFO: eASCIZ =2ENXSSZAMODE=ZTATIZTZA/PASS=275? 
2563 013614 040445 047515 042504 

2564 013622 022475 022524 022524 

25605 013630 022524 027501 040520 

2566 013636 051523 022475 32532 

td 013644 000 

2569 013645 022516 032 SHF1: eASCIZ PENZSSESSESSZA/ATLA/ZTZA/AT* 4/27? 


2574 013702 052045 
2576 013705 045 032523 040445 EFM2: .ASCIZ /RSSZATOTAL MISMATCHES IN MSG = %D5/ 


020075 
2582 013750 047045 051445 022463 PCPM: .ASCIZ /%NXZS3ZACALLED FROM PC=%06/ 


2586 000066 
44 014002 051445 0224665 041501 EFM11: .ASCIZ /%SSZACOMPARE COUNT=2D5%S32ARECEIVE COUNT=%2D5/ 


2592 014040 04 042526 041440 
2593 014046 052517 052116 022475 
5594 014054 032504 000 
2595 014057 115 042117 046505 MSCMS: .ASCIZ /MODEM STATUS CHANGES FOR THIS PASS WERE../ 
59% 014064 051440 040524 052524 
2597 014072 020123 044103 047101 
2598 014100 042507 020123 047506 
2599 014106 020122 044124 051511 
2600 014114 050040 051501 020123 
2601 014122 042527 042522 027056 
2602 014130 000 , 
2603 014131 045 032523 040445 EFM13: .ASCIZ /2SSRAHARD CHANGES=2D52%A2S 5ZAGLITCHES=205/ 
2604 014136 040510 042122 041440 
2605 014144 040510 043516 051505 
2606 014152 022475 032504 040445 
2607 014160 051445 022463 043501 
2608 014166 044514 041524 042510 
014174 036523 042045 000065 
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2610 

2611 

2612 

2613 

2614 014202 051124 047101 
2615 014210 052111 046440 
2616 014216 050440 042525 
2617 014224 000104 

2618 014226 051124 047101 
2619 014234 052111 046440 
2620 014242 041440 046517 
2621 014250 052105 042105 
2622 014255 122 041505 
2623 014262 042526 051440 
2624 014270 042503 050440 
2625 014276 042525 00010 
2626 014302 042522 042503 
2627 014310 020105 051515 
2628 014316 047503 050115 
2629 014324 042524 000104 
2630 014330 042504 044526 
2631 014336 042440 051122 
2632 014344 000 

2633 014345 106 052101 
2634 014352 047503 050115 
2635 014360 051511 047117 
26 014366 040524 052122 
2637 014374 000 

2638 014375 104 053105 
2639 014402 020105 047111 
2640 014410 040440 042116 
2641 014416 052105 050125 
2642 014423 104 052101 
2643 014430 047503 050115 
2644 014436 051511 047117 
2645 014444 047105 107 
2646 014452 051105 047522 


2649 01 
2650 014502 040524 042440 
2651 014510 051117 00 
2652 014513 105 042116 
2653 014520 020106 040520 
2654 014526 
2655 014527 115 042117 
2656 014534 051440 040524 
2657 014542 020123 044103 
2658 014550 042507 000 
2659 
2660 
2661 014553 045 031523 
2662 014560 000063 
2663 014562 051445 022463 
2664 014570 000 

014571 022516 


CVCLHA DPV=11 DATA COMM. LINK TEST 


051122 


047440 
051523 


046505 


052524 
047101 


047445 
033117 
033117 
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GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


1 5 
25-JUL-80 10:29 PAGE 6 


EVENT DESCRIPTION MESSAGES 


EDTXQ: 


EDTXC: 


EDRXQ: 


EDRXC: 


EDDER: 


EDDCK: 


EDDVI: 


EDDLE: 


EDDDE: 


EDEOP: 


EDMOS: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCI2 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/TRANSMIT MSG QUEUED/ 


/TRANSMIT MSG COMPLETED/ 


/RECELVE SPACE QUEUED/ 


/RECELVE MSG COMPLETED/ 


/DEVICE ERROR/ 


/DATA COMPARISON STARTED/ 


/DEVICE INIT AND SETUP/ 


/DATA COMPARISON LENGTH ERROR/ 


/DATA COMPARISON DATA ERROR/ 


7END OF PASS/ 


/MODEM STATUS CHANGE / 


;EVENT REPORTING MESSAGES 
eASCIZ §=/%S3%03/ 


BASM3: 


BASM2: 


BASM1: 


-ASCIZ 


-ASCIZ 


/%S3%06/ 
/EN%06/ 


SEQ 0060 








i 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 62 
CVCLHA.P11 25-JUL-80 10:26 GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO SEQ 0061 
2666 014576 000 
2667 014577 045 022516 052101 NULEVT: .ASCIZ /%NZATHE EVENT LOG IS EMPTY/ 
2 014604 042510 042440 042526 
2669 014612 052116 046040 043517 
2670 014620 044440 620123 046505 
2671 014626 052120 000131 


2672 014632 047045 040645 037076 EVITFO: .ASCIZ /%NXZA>>> EVENT LOG ENTRY KKK £66666 666K K CK KEE EEE E ECE K EERE KKK / 


680 
2681 014720 036074 036074 036074 
et 014730 047045 042045 022465 EVIF1: .ASCIZ /ENXDSLA:RZ2RA:%724S32T/ 


2685 014744 035101 055045 022462 
2686 014752 031523 052045 000 
2687 014757 045 022516 031523 EVIF2: .ASCIZ /XN%XS3XZAADDR OF MSG=%06%S3ZABYTE COUNT =%D5/ 
2688 014764 0445 042101 051104 
2689 014772 047440 020106 051515 
690 015000 036507 047445 022466 
2691 015006 031523 040445 054502 
2692 015014 042524 041440 052517 
2693 015022 052116 022475 032504 
2694 015030 000 
2695 015031 45 022516 031523 EVTF3: .ASCIZ /2NXS3XT2N/ 
2696 015036 052045 047045 000 
2697 015043 45 031523 04674645 EvTF3C: .ASCIZ /%S83%06%S3%06/ 
2698 015050 022466 031523 047445 
2699 015056 000066 
2700 015060 051445 0224663 033117 EVIF3D: .ASCIZ /%S3%06%S3%06%S32T/ 
2701 015066 051445 022463 033117 
2702 015074 051445 022463 000124 
2703 015102 047045 051445 022463 EVIF4: .ASCIZ /%NZS3ZAADDR OF MSG=%0mXS3ZABYTE COUNT=%D52%S32ANO. OF CMP ERRS=2D5/ 
2704 015110 040501 042104 020122 
2705 015116 043117 046440 043523 
2706 015124 022475 033117 051445 
2707 015132 022463 041101 052131 
2708 015140 020105 047503 047125 
2709 015146 036524 042045 022465 
2710 015154 031523 040445 047516 
2711 015162 020056 043117 041440 
gre 015170 050115 042440 051122 
2713 015176 036523 042045 000065 
2714 015204 047045 051445 022463 EVIF4A: .ASCIZ /%NZS3KAADDR OF MSG=%O6ZS32ARKX BYTES=2D5%S32ACOMPARE BYTES=205/ 
$78 Orage og tee 042104 020122 
716 015220 043117 046440 043523 
2717 015226 022475 033117 051445 
2718 015234 022463 051101 360130 
2719 Ot asee ghey 042524 036523 
2720 015250 042045 022465 031523 
2721 015256 040445 047503 050115 








K 5 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 63 
CVCLHA.P11 25-JUL-80 10:26 GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO SEQ 0062 


27¢2 015264 051101 020105 054502 

2723 Ot 2gfe 042524 036523 042045 

sige 015300 000005 

2726 015302 047045 051445 022463 EVTF4B: .ASCIZ /XNZS3ZAPASS=%D52S 3ZAERRORS=2052S SZASTRI-10=205/ 
2727 015310 050101 051501 036523 

2728 015316 042045 022465 031523 

2729 015324 0445 051105 047522 

2730 015332 051522 022475 032504 

2731 015340 051445 022463 051501 

2732 015346 051124 026524 047524 

ie}, 015354 022475 032504 000 

2735 015361 045 032523 040445 EVTFSA: .ASS.2 /XSSXABYTEM# IN MSG.=%D5%S3ZAEXPTD=%03%S 32ARECVD=203/ 
2756 015366 054502 042524 020043 

2737 015374 047111 046440 043523 

2738 015402 036456 042045 022465 

2739 015410 031523 040445 054105 

2740 015416 052120 036504 047445 

2741 015424 022463 031523 040445 

2742 015432 042522 053103 036504 


2743 015440 047445 000063 


2745 015444 047045 051445 022471 
2746 015452 041501 040510 043516 
2747 015460 042105 052040 035117 
2748 015466 000 


EVMOCG: .ASCIZ /%NZS9ZACHANGED T10:/ 


749 
sree FY RARER AERERAAAAHRERAEREARARAKRAHREKRKRARAAARAEARERE AAA 
sre) :DO NOT SEPERATE THE NEXT LIST OF MESSAGES - MODEM SIGNAL HEADER AND REPORT 
2753 015467 045 022516 034123 EVMOHD: .ASCIZ /%NZSBXAMODEM STATUS: CTS DSR DCD RTS RI SQD TM/ 
2754 015474 040445 047515 042504 
2755 015502 020115 052123 052101 
2756 015510 051525 020072 052103 
2757 015516 020123 051504 020122 
2758 015524 041504 020104 052122 
2759 015532 020123 044522 020040 
2760 015540 050523 020104 046524 
2761 015546 000 
2762 015547 045 022516 034523 EVMOST: .ASCII] /2NZS9XS9XSS2A/ 
2763 015554 051445 022471 032523 
2764 015562 040445 
2765 015564 130 040 040 EVMCTS: .BYTE *x,40,40,40 
2766 015567 040 
2767 015570 130 040 040 EVMDSR: .BYTE ‘'X,40,40,40 
2768 015573 040 
2769 015574 130 040 040 EVMDCD: .BYTE ‘'X,40,40,40 
2770 015577 040 
2771 015600 130 040 040 EVMRTS: .BYTE ‘'X,40,40,40 
2772 015603 040 
2773 015604 130 040 040 EVMRI: .BYTE ‘'x,40,40,40 
774 015607 040 
775 015610 130 040 040 EVMSQD: .BYTE *x,40,40,40 
2776 =015613 040 
2777 =015614 130 040 040 EVMTM: .BYTE *¥,40,40,40 








CVCLHA_DPV-11 DATA COMM, LINK TEST 
25-JUL-80 10:26 


CVCLHA.P11 
27/8 015617 
2779 +=015620 
2780 
2781 
2782 
2783 015622 
2784 015625 
2785 015632 
2786 015636 
2787 015644 
2788 015647 
2789 015654 
2790 015660 
2791 015666 
2792 =015671 
2793 015676 
2794 015702 
2795 015710 
2796 =015713 
2797 +=015720 
2798 015724 
2799 015732 
2800 015735 
2801 015742 
2802 
2803 
2804 015746 
2805 015754 
2806 
2807 015757 
2808 015764 
2809 015772 
2810 016000 
2811 016005 
2812 016012 
2813 016020 
2814 016026 
2815 016034 


040 
000 
15622 


047045 
5 


5 
047505 


051445 
041523 


00 
031523 
000120 
022463 

000 


042117 


051122 


040445 
052101 
040445 
042501 
040445 
044501 
040445 
041501 
040445 


046501 


046505 


051117 


MACY11 30A(1052) 


STXQ: 
STXC: 
SRXQ: 
SDVE: 
SCM: 

SDVI: 
SCML: 
SCMD: 
SEOP: 


SMSC: 


GLMSG: 





5 
10:29 PAGE 64 


GLOBAL op Sric80, 10:2 MESSAGES, AND ASCII INFO SEQ 0063 
«BYTE 0 
EVEN 
 elaacidana ® tae *~ aaa TO Oe CR TOR LINES IN i AWAKE 
eASCIZ = /%S3%ATXO/ ;AB0UT TO TRANSMIT 
eASCIZ =/2S3KATXC/ ;TX COMPLETED 
eASCIZ = /%S3ZARKQ/ ;ABOUT TO RECEIVE 
eASCIZ =/2S3RAERR/ :DEVICE ERROR 
eASCIZ = =/%S3%ACMP/ ;ABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD 
eASCIZ /%S3%AINI/ ;DEVICE ABOUT TO BE INITIALIZED 
sASCIZ = /%S3%ACML/ ; COMPARE LENGTH ERROR 
sASCIZ = /%S3%ACMD/ ;COMPARE DATA ERROR 
eASCIZ = /%S3%AE0P/ ;END OF PASS 
-EVEN 
eASCIZ = /%S5%AMSC/ ;MODEM STATUS CHANGE. 
eASCIZ /MODEM STATUS GLITCHED/ 
-ASCIZ /MODEM STATUS HARD ERROR/ 


HRDMSG: 


| 
| 







mM 5 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 65 
CVCLHA.P11 25-JUL-80 10:26 GLOBAL FORMAT STATEMENTS, MESS4GES, AND ASCII INFO SEQ 0064 


2818 

2819 016035 115 051501 042524 DVEMO: .ASCII /MASTER RESET DID NOT WORK/ 
2820 016042 020122 042522 042523 

2821 016050 020124 044504 020104 

2822 016056 047516 020124 047527 

2823 016064 045522 

2824 016066 005015 020040 051040 eASCIZ <15><12>/ = RXCSR TXCSR / 
2825 016074 041530 051123 020040 

2826 016102 020040 054124 051503 

2827 016110 020122 000040 

2828 016114 047516 041440 042514 CYEM1: .ASCII /NO CLEAR TO SEND FROM MODEM / 
2529 016122 051101 052040 020117 

2830 016130 042523 042116 043040 

2831 016136 047522 020115 047515 

2832 016144 042504 020115 

2833 016150 005015 020040 051040 eASCIZ <15><12>/ = RXCSR TXCSR / 
2834 016156 041530 051123 020040 

2835 016164 020040 054124 051503 

2836 016172 020122 000040 

2837 016176 044524 042515 047440 DVEM2: .ASCII /TIME OUT WAITING FOR RX OR TX TO COMPLETE/ 
2838 016204 052125 053440 044501 

£839 016212 044524 043516 043040 

2840 016220 051117 051040 020130 
2841 016226 051117 052040 020130 
2842 016234 047524 041440 046517 
2843 016242 046120 052105 105 
2844 tert 015 Bey 12 020040 eASCIZ <15><12>/ = =RXCSR TXCSR/ 
2845 016254 054122 051503 020122 
2846 016262 020040 052040 041530 
2847 016270 051123 
2848 016275 103 041522 044440 DVEM3: .ASCII /CRC IN ERROR/ 

2849 016300 020116 051105 047522 
2850 016306 122 
2851 016307 015 020012 020040 eASCI1Z = <15><12>/ = RDSR RXCSR/ 
2852 016314 042122 051123 020040 
2855 016322 020040 051040 041530 
2854 0163 051123 000 
2855 016333 122 041505 044505 DVEM4: .ASCII /RECEIVER OVERRUN/ 

2856 016340 042526 020122 053117 

2857 016346 051105 052522 116 

2858 016353 015 020012 020040 eASCIZ <15><12>/ = RDSR RXCSR/ 
2859 016360 042122 051123 020040 

2860 016366 020040 051040 153 

2861 016374 051123 000 

coat 016377 124 046511 2105 DVEMS: .ASCII] /TIMED OUT IN START,STACK,ACK SEQ/ 
2863 016404 0474460 052125 044440 

2864 016612 020116 052123 051101 

2865 0164 026124 052125 041501 

2 016426 026113 041501 020113 

see 0164 042523 121 

016437 015 Seshhy 020040 eASCIZ =<15><12>/ = RDATA SDATA/ 

§ 9 016444 042122 052101 020101 

870 016452 020040 051440 040504 

871 016460 040524 000 

872 016463 115 042117 046505 DVEM6: .ASCII] /MODEM DID NOT RETURN MODEM READY/ 
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WoONnu—Funo 
oooo ocoOoCcoO 
MOWN —UIOAOoO— 





-ASCIZ 


<15><12>/ 


N 5 
A(1052) 25-JUL-80 10:29 PAGE 66 
LOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


RXCSR 


TXCSR/ 









CVCLHA.P11 25-JUL-80 10:26 


«EVEN 


B 6 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 67 
GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


' 
‘ 
: 


a 


ee ee ee re oe He - 
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CVCLHA DPV=-11 DASA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 68 


CVCLHA.P11 25-JUL=80 10:26 GLOBAL ERROR REPORT SECTION SEQ 0067 
2893 .SBTTL GLOBAL ERROR REPORT SECTION 
2894 
2395 s+ 
2896 : THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 
2897 : USED BY MORE [HAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 
sore ; (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 
2900 
2901 
2902 
2903 
2904 
2905 016550 BGNMSG ERR1 
2906 016550 ERR1:: 
2907 016550 PRINTB W#EVTFSA,OFSET,<B,GOOD>,<&,BAD> ;INDIVIDUAL DATA COMPARE ERROR 
2908 016550 005046 CLR -(SP) 
2909 016552 153716 006537 BISB BAD, (SP) 
2910 016556 005046 CLR -(SP) 
2911 016560 153716 006536 BISB GOOD, (SP) 
2912 016564 013746 006514 MOV OF SET, -(SP) 
2913 016570 012746 015361 MOV #EVTF5A,-(SP) 
2914 016574 012746 000004 MOV #4 ,-(SP) 
2915 01 010600 MOV SP,RO 
2916 016602 104414 TRAP CSPNTB 
2917 016604 062706 000012 ADD #12,SP 
2918 016610 ENDMSG 
2919 016610 L10001: 
$920 016610 104423 TRAP C$MSG 
2922 016612 BGNMSG ERR2 
2923 016612 ERR2:: 
2924 016612 PRINTB WEFM2, TEMP sTOTAL DATA COMPARE FAILS ERROR 
2925 016612 013746 006526 MOV TEMP4 ,-(SP) 
2926 016616 012746 013705 MOV #EFM2,-(SP) 
2927 016622 012746 000002 MOV #2,-(SP) 
2928 016626 010600 MOV SP RO 
2929 016630 104414 TRAP CSPNTB 
2930 016632 062706 000006 ADD #6,SP 
2931 016636 ENDMSG 
2932 016636 L10002: 
ath 016636 104423 TRAP C$MSG 
2935 016640 BGNMSG ERR1I0 
2936 016640 ERR10:: 
2937 016640 PRINTB #EFM11,R4, TEMPS ZLENGH COMPARISON ERROR 
2938 016640 013746 006524 MOV TEMP3,-(SP) 
2939 016644 010446 MOV R4,-(SP) 
2940 016646 012746 014002 MOV #EFM11,-(SP) 
2941 016652 012746 000003 MOV #3,-(SP) 
2942 016656 010600 MOV SP RO 
2943 016660 104414 TRAP CSPNTB 
2944 016662 062706 000010 ADD #i0,SP 
2945 016666 ENDMSG 
2946 016666 110003: 
2947 016666 104423 TRAP C$MSG 





CVCLHA DPV-11 DATA COMM. LINK TEST 
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2995 


posesseeaee 


016720 


016722 


017002 
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104423 


013746 


062706 


104423 


104423 


000167 


006526 


000003 


000010 


006532 


000012 


Dd 6 
MACY11 30A(1052) 25-JUL-80 10:29 PAGE 69 
GLOBAL ERROR REPORT SECTION SEQ 0068 


BGNMSG ERR4 


ERR4:: 
PRINTB #EFM13,MHRCNT MGLCNT sMODEM STATUS CHANGE 
MOV MGLCNT,-(SP) 
MOv MHRCNT,-(SP) 
MOV #EFM13,-(SP) 
MOV #3,-(SP) 
SP,RO 


MO ‘ 
TRAP CSPNTB 

ADD #10,SP 
ENDMSS 


L10004: 
TRAP C$MSG 
“PRINT THE 2 OCTAL #'S IN TEMP3/4 
BGNMSG ERR13 
ERR13:: 
PRINTB M#EVTF3C, TEMPS, TEMPS 
MOV TEMPS ,-( SP) 
MOV TEMP3,=(SP) 
MOV MEVTF3C,-(SP) 
MOV #3,-(SP) 
MOV SP,RO 
TRAP CSPNTB 
ADD #10,SP 
ENDMSG 
L10005: 
TRAP C$MSG 
:PRINT THE 2 OCTAL #°S IN TEMP3/4 
; AND THE MESG. WHUSE ADDR. IS IN CONCTM 
BGNMSG ERR14 
ERRI4:: 
PRINTIB #EVTF3D, TEMPS, TEMPS, CONOTM 
MOV CONOTM, -(SP) 
MOV TEMP4 ,-(SP) 
MOV TEMP3,-(SP) 
MOV #EVTF 8D, -<SP) 
MOV #4 ,-(SP) 
MOV SP,RO 
TRAP CSPNTB 
ADD #i2.sP 
ENDMSG 
L10006: 
TRAP C$MSG 
EXIT MS6 
. WORD J$umep 














—E 6 
CVCLHA DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 70 
CVCLHA.P11 25-JUL-80 10:26 GLOBAL ERROR REPORT SECTION 


3005 017014 177772 -WORD L10006-2-. 
3006 
3007 


SEQ 0069 





F 6 
CVCLHA DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 71 


CVCLHA.P11 25-=JUL=80 10:26 GLOBAL SUBROUTINES SECTION SEQ 0070 
30.8 .SBTTL GLOBAL SUBROUTINES SECTION 
3009 
3010 poe 
3011 : THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
3018 : THAT ARE USED IN MORE THAN ONE TEST. 
3014 
3015 
wie .SBTTL CLOCK SETUP SUBROUTINE 
3018 pe4 
3019 ; FUNCTIONAL DESCRIPTION: 
3020 : THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TABLE FOLLOWING A ‘‘CLOCK'’ 
3021 ; CALL EXECUTED IN THE INITIALIZATION CODE. BUT SINCE THE ‘‘CLOCK’’ CALL 
3022 : SAYS NOTHING ABOUT AN LSI-11'S CLOCK, THIS ROUTINE IS ONLY USED IF A 
3023 : LINE OR P=CLOCK IS FOUND. 
3024 ; 
3025 ; INPUTS: 
3026 ; Rl= POINTS TO SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED 
3027 ; R2= POINTS TO ‘'CLK'’ TABLE WHERE CLOCK INFO WILL BE KEPT 
3029 ; IMPLICIT INPUTS: 
308 ; THE SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED BY THE ‘‘CLOCK' CALL 
3032 : OUTPUTS: 
3033 ; “CLKCSR'' GETS LOADED WITH THE CLOCK'S CSR ADDRESS 
3034 : “CLKBR'’ GETS LOADED WITH THE CLOCK'S INTERRUPT LEVEL 
3035 “CLKVEC'’ GETS LOADED WITH THE CLOCK'S INTERRUPT VECTOR 
3036 ; “CLKHZ'' GETS LOADED WITH THE LINE FREQ. (HERTZ RATE) WHICH DETERMINES 
3037 : THE NUMBER OF TICKS IN A SECOND 
3039 ; CALLING SEQUENCE: 
98 3 JSR PC, CLKSET sCALL CLOCK SETUP WITH R1 & R2 SETUP 
3042 
3043 017016 CLKSET: 
3044 017016 012122 MOV (R1)+,(R2)¢ LOAD CLOCK'S CSR ADDR. INTO “’CLKCSR’’ 
3065 017020 012112 MOV (R1)+#,(R2) :LOAD CLOCK'S INT. LEVEL INTO “‘CLKBR"' 
3046 017022 006312 ASL (R2) ADJUST THE INT. LEVEL FOR LOADING INTO 
3047 017024 006312 ASL (R2) 3 THE PSwW WITH A ‘‘SETVEC’’ CALL 
3048 017026 006312 ASL (R2) 
3049 017030 006312 ASL (R2) 
3050 017032 006322 ASL (R2)¢ 
3051 017034 012122 MOV (R1)*,(R2)¢ SLOAD CLOCK'S INT. VECTOR INTO “‘CLKVEC’ 
3052 017036 012122 MOV (R1)*#,(R2)¢ LOAD CLOCK'S HERTZ RATE INTO "‘CLKHZ" 
3053 017040 000207 RTS PC 


G 6 
CVCLHA DPv-11 DATA et — TEST MACY11 30A(1052) 25=JUL-80 10:29 PAGE 72 


CVCLHA.P11 *§=jJUL-80 10:2 CLOCK SETUP SUBROUTINE SEQ 0071 
30:5 
Fs: SBTTL CLOCK INTERRUPT SERVICE ROUTINE 
3058 ; “FUNCTIONAL bgSEn PT tOms 
3059 : HIS IS THE CLOCK INTERRUPT SERVICE ROUTINE WHICH TAKES CARE OF 
3060 : KEEPING THE "'TIME=SINCE=START'’ AND COUNTING DOWN ANY OF THE 
3061 ; “EVENT'’ TIMERS. THE TIMERS ARE USED TO TIME COMPLETION OF DEVICE 
3062 : REQUESTS. THE ''TIME=SINCE=START'' IS USED TO BE LOGGED WITH EACH ENTRY 
3063 INTO THE EVENT LOG. 
3064 : 
3065 ; iene 1 ppg © 
3006 : TIMTCK: THE CURRENT NO. OF Tacns LEFT TO BE COUNTED UNTIL A SECOND 
3067 ; HAS een COUNTED OFF 
3068 : CLKHZ2: THE NO. OF TICKS IN A SECOND, DETERMINED . THE SYS. LINE FREQ. 
3069 ; TIMMIN & TIMSEC : CURRENT VALUE OF “Tine “since STAR 
3070 F IN MINUTES & SECONDS 
al : TIMER 1,2, & S: CURRENT VALUES OF THE FEVENT TIMERS" 
3078 >; IMPLICIT OUTPUTS: 
3074 : NEW VALUE OF EVENT TIMER ‘'l'’ DECREMENTED BY 1 TICK IF IT WAS NON-ZERO 
3075 : NEW VALUE OF EVENT TIMER ‘''2'' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO 
S509 ; NEW VALUE OF EVENT TIMER ‘'S'’ DECREMENTED BY i SECOND IF IT WAS NON-ZERO 
3078 ; FUNCTIONAL SIDE EFFECTS: 
+4 : THE CLOCK IS DISABLED UPON ENTRY AND REENABLED WHEN LEAVING 
3081 ; CALLING SEQUENCE: 
3082 : THIS ROUTINE IS CALLED WHEN THE CLOCK INTERRUPTS THRU “‘CLKVEC"’. 
3083 ; THE ADDRESS OF THIS ROUTINE WAS LOADED INTO THE CLOCK'S INTERRUPT 
3084 : VECTOR WITH A SUPERVISOR ‘'SETVEC'’ CALL. 
3085 ; 
3086 
3087 017042 BGNSRV CLKINT 
ss 017042 CLKINT:: 
3090 017042 005077 167532 CLR aCLKCSR DISABLE THE CLOCK FORM INTERRUPTING 
3091 017046 005337 006616 DEC TIMTCK sDECREMENT THE # OF TICKS/SEC 
3092 017052 001015 BNE 1$ GO CHECK TIMERS (182-TICKS, 3-SECONDS) 
3093 017054 013737 006606 006616 MOV CLKHZ, TIMTCK SRESET THE # OF TICKS/SEC. 
3094 017062 005237 006614 INC TIMSEC INC # OF SECS~SINCE- START 
3095 017066 022737 000074 006614 CMP #60., TIMSEC =SEE IF WE'VE COUNTED 60 SECS. YET 
3096 017074 001004 BNE 1$ IF NOT, GO CHECK TIMERS 
3097 017076 005237 006612 INC TIMMIN ; ELSE INC MINUTES-SINCE-START 
3098 017102 005037 006614 CLR TIASEC ; AND RESTART SECOND COUNTER 
3100 017106 005737 006620 1$: TST TIMER) ; SEE IF TIMER #1, TIMING ANYTHING 
3101 017112 001402 BEQ 2% : [F=0, NOTHING BEING TIMED CHECK we nT TIMER 
3102 017114 005337 006620 DEC TIMER1 ; ELSE DECREMENT THE TIMER VALUE (BY 1 TICK) 
3103 017120 005737 006622 23: TST TIMER2 ;SEE IF TIMER #2, TIMING ANYTHING 
3104 017124 001402 BEQ 3$ : IF=0, NOTHING BEING TIMED CHECK NEXT TIMER 
3105 017126 005337 006622 DEC TIMER2 : ELSE DECREMENT THE TIMER VALUE (BY 1 TICK) 
3106 017132 005737 006624 34: TST TIMERS :SEE IF TIMER #3, TIMING ANYTHING 
3107 017136 001406 BEQ 4$ ; 1Ff=0, WOTHING BEING TIMED, LEAVE 
3108 017140 023737 006606 006616 CMP CLKHZ, TIMTCK ; SEE If A SECOND HAS BEEN COUNTED OFF 
3109 017146 001002 BNE 4 ; BR IF NO 
3110 017150 005337 006624 DEC TIMERS ; ELSE DECREMENT THE TIMER VALUE (BY 1 SEC.) 








Sr 


H 6 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25=JUL-80 10:29 PAGE 73 
CVCLHA.P11 25-JUL-80 10:26 CLOCK INTERRUPT SERVICE ROUTINE 


154 013777 006610 167416 4$: MOV CLKEN,@CLKCSR ;REENABLE THE CLOCK TO INTERRUPT 
162 ENDSRV 


162 
162 000002 


L10007: 
RT! 


SEQ 0072 
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CVCLHA DPV=11 DATA COMM. LINK TEST MACY11 yeh ta 25-JUL=80 10:29 PAGE 74 
CVCLHA.F11 25-JUL-80 10:26 EVENT LOG SUBROUTINES SEQ 0073 


«SBTTL EVENT LOG SUBROUTINES 


FUNCTIONAL DESCRIPTION: 
HIS SUBROUTINE HAS A DIFFERENT ENTRY POINT 
FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS 
THE SHORT ‘‘OPERATOR AWAKE" MESSAGE TO CONSOLE THEN LOGS THE 
EVENT TYPE, TIME, AND THE OTHER 3 WORDS OF INFO PASSED TO THE 
SUBROUTINE AT CALLING TIME 


INPUTS: 
TIMMIN & TIMSEC: CURRENT VALUE OF ‘'TIME=SINCE-START'' 

TEMP2: WORD #1 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES) 
TEMP3: WORD #2 OF EVENT LOG INFORMATION 

TEMP4: WORD #3 OF EVENT LOG INFORMATION 

MODS: CURRENT VALUE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE 


OUTPUTS: 
“OPERATOR AWAKE'’ MESSAGE SENT TO THE CONSOLE 
NEW EVENT LOGGED iN ‘’EVTLOG'’ (EVENT LOG) 
UPDATED "‘EVTPTR'’ (EVENT LOG ENTRY POINTER) 


SUBORDINATE ROUTINES USED: 
"“DVMODS'' THE DEVICE SUBROUTINE THAT RETURNS MODEM STATUS IN ‘™MODS"' 
(FOR SOME EVENT TYPES) 


FUNCTIONAL SIDE EFFECTS: 
TEMP: USED TO STORE ADDRESS OF ‘‘OPERATOR AWAKE'’ MESSAGE 
TEMP1: USED TO SETUP THE VALUE OF THE ‘EVENT TYPE’ BYTE FOR LOGGING 


naan eter be 
PC ,LOGTXQ ;CALL THE LOG EVENT SUBROUTINE WITH TEMP,TEMP1, 


Be Be Be Be He Be He He Oe ee 


BEE AANA WWNP NPP PNP 2 2 OS OS - 


SAPO O , oe ae 
SSS2ES3FS22 OOWNO VF WN $0 OD NOV FWPND — O COONAN EFWND |= C OOMNOUEF WN —-OOOneou 


EEE I OI LAI IO AOA OOO AAA AAW WANA AANA ANNAN 
ll ll le et at a a ot ot ot a Yh 


47 . + Ss : TEMP2, TEMP3, AND TEMP4 SETUP 

‘ JSR PC ,LOGCMP 

5 

52 017164 LOGTXQ: 

53 017164 012737 015625 006520 MOV #STXQ, TEMP :SET UP MSG. TO PRINT 

$4 017172 012737 000000 006516 MOV #1x0, TEMP :SET UP EVENT TYPE 

3 017200 000517 BR L0GS1 "GO LOG EVENT AND TIME 

57 017202 : LOGIXC: 

58 017202 012737 015636 006520 MOV #STXC, TEMP :SET UP MSG. TO PRINT 

59 017210 012737 000002 006516 MOV #TXC, TEMP :SET UP EVENT TYPE 

60 017216 000510 BR LOGS{ :GO LOG EVENT AND TIME 

62 017220 LOGRXQ: 

63 017220 012737 015647 006520 MOV #SRXQ, TEMP :SET UP MSG. '9 PRINT 
017226 012737 000004 006516 MOV #RXQ, TEMP SET UP EVENT TYPE 
017234 000501 BR LOGSi :60 LOG EVENT AND TIME 
017236 LOGRXC: 

017236 012737 000006 006516 MOV #RXC, TEMP :SET UP EVENT TYPE 
017244 000475 BR LOGS! +60 L0G EVENT AND TIME 
017246 LGDVE : 





CVCLHA A aa -11_ DATA COMM. LINK TEST 
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246 012737 


7346 000451 
7350 012737 


SSSLESEANLSSSIEAEATAS SAIS GRAS 


7356 012737 
7364 000442 
7366 
7366 012737 
7374 012737 
7402 000433 
7404 
7404 012737 
7412 012737 
: 7420 000424 
3201 
3202 017422 
3203 017422 012737 
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LOGDVI: 


LOGCMP: 


LOGCML: 


LOGCMD: 


LOGEOP: 


LOGMSC: 


LOGS1: 


LOGS3: 
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EVENT LOG SUBROUTINES 


#SOVE, TEMP1 :SET UP MSG. TO PRINT 
DER. TEMP “SET UP EVENT TYPE 

LOGS ‘GO LOG EVENT AND TIME 
#SDVI, TEMP :SET UP MSG. TO PRINT 
#OVI, TEMP “SET UP EVENT TYPE 
MODTYP, TEMP2 

MLTYP, TEMP2¢1 

RPASS. TEMP3 

PARAM, TEMP4 ;SET UP EVNT ENTRIES 
LOGS3 :GO LOG EVENT AND TIME 
#SCM, TEMP :SET UP MSG. TO PRINT 
#DCK TEMP ‘SET UP EVENT TYPE 

LOGS 

#SCML, TEMP1 

#DLE, TEMP :SET UP MSG. AND TYPE 
L0GS$ “GO LOG EVENT AND TIME 
#SCMD, TEMP) 

#DDE, TEMP 

LOGS3 :GO0 LOG MSG TYPE AND TIME 
#SEOP, TEMP1 

#EOP. TEMP 

LOGS$ :GO LOG MSG TYPE AND TIME 


#SMSC, TEMP 


#MSC, TEMP 
LOGS8 

ERRCNT,-(SP) :SAVE CURRENT ERROR COUNT 
PC ,DVMODS : GO GET MODEM STATUS 


(SP)+,R4 ;GET SAVED ERRCNT VALUE 

R4,ERRCNT ;WHERE ANY ERRORS FOUND 

1$ ; BR IF NONE 

LOGE X ; ELSE, LEAVE WITHOUT LOGGING ANYTHING 
; BUT THE DEVICE ERROR FROM "'DVMODS'' 

MODS, TEMPS SAND PUT IT IN TEMP4 

@RXC, TEMP 

LOGS 7 1F RXC DONT PRINT 

#STATB, PARAM 

LOGS5 31f NO STATUS SELECTED 
360 T0 5 

#10,LNCNT ;HAVE WE DONE ye 

LOGS4 :1F NOT GO TO 4 

LNCNT ZESLE CLEAR IT 


SEQ 0074 
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ec? 
3228 017526 PRINIF #CR ELSE PRINT CR 

3229 gtr 2s 012746 015622 MOV #CR,-(SP) 
3230 017532 012746 000001 MOV #1,-(SP) 
3231 017536 01060 MOv SP,RO 
3232 017540 104417 TRAP CSPNTF 
3233 017542 062706 000004 ADD #4 ,SP 
3234 017546 LOGS4: 
3235 017546 005237 006462 INC LNCNT s INC COUNTER OF # OF AWAKE MSGS 

3236 017552 PRINTF TEMP1 :PRINT OPERATOR AWAKE MSG. 

3237 017552 013746 006520 MOV TEMP1,-(SP) 
3238 017556 012746 000001 MOV #1,-(SP) 
3239 017562 01 MOV SP,RO 
3240 017564 104417 TRAP CSPNTF 
3241 017566 062706 000004 ADD a4 ,SP 
3242 017572 010346 LOGSS: MOV R3,-(SP) SAVE R3 ON THE STACK 

3243 017574 013703 006626 MOV EVTPTR,R3 

3244 017600 113723 006516 MOVB TEMP, (R3)+ ;LOG EVENT 

3245 017604 013737 006606 006516 MOV CLKHZ, TEMP 

3246 017612 163737 006616 006516 SUB TIMTCK, TEMP 

3247 017620 113723 006516 MOVB TEMP, (R3)¢ LOG TIME SINCE START 

3248 017624 113723 006614 MOVB TIMSEC,(R3)+ 

3249 017630 113723 006612 MOVB TIMMIN, (R3)+ sTICKS,SECS AND MINS. 

3250 017634 013723 006522 MOV TEMP2,(R3)+ ;LOG EVNT ENTRY 3 

3251 017640 013723 006524 MOV TEMP3,(R3)+ ;LOG EVNT ENTRY 4 

3252 017644 013723 006526 MOV TEMP4,(R3)¢ :LO0G EVNT ENTRY 5 

3253 017650 020327 007532 CMP R3,#EVTEND 

3254 017654 103404 BLO LOGS2 sIF EVENT LOG FULL GO 

3255 s CONTINUE; ELSE GO TO 2 

3256 017656 012713 177777 MOV #-1,(R3) LOG A TABLE END 

3257 017662 012703 006630 MOV #EVTLOG,R3 ;PUT R3 TO START OF TABLE 

3258 017666 010337 006626 LOGS2: MOV R3,EVTIPTR RESTORE POINTER 

3259 017672 012603 MOV (SP)+,R3 RESTORE R3 

017674 000207 LOGEX: RIS PC 
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~ SBTTL 


REPORT: 


RPT: 


RPT1: 


RPTO: 
RPTAA: 


DUMP EVENT LOG AND BASE TABLE 
DUMP EVENT LOG AND BASE TABLE 


MOV R2,-(SP) SAVE R2,R3,R4 ON THE STACK 
MOV R3,-(SP) 


MOV RG ,-(SP) 


MOV EVTPTR,R2 
CMP EVTLOG,#-1 ;SEE IF EVENT TABLE IS EMPTY 
BNE RPTO ;BR IF NO 

PRINTS #NULEVT ;IF EMPTY TELL OPRERATOR. 


JMP ENDEVT ;AND END 


SUB #12,R2 
; JUST PRINTED 


CMP R2,#EVTLOG 
RPT1 


MAKE R2 A POINTER TO EVENT TABLE 


sNOW POINT BACK TO TUP OF ENTRY U 


et a Oe TOP OF EVNT LOG QUEUE? 


BNE 

MOV #EVTEND,R2 ;SET R2 TO POINT TO BOTTOM OF LOU 
CMP -2(R2) ,#-1 

BNE RPTO ;IF END OF LOG IS “sf EMPTY 

JMP ENDEVT SCONTINUE...FLSE EX 

CMP R2,EVIPTR ;ARE WE BACK TO POINTER? 

BNE RPTO ;1F NOT CONTINUE 

JMP ENDEVT :1f SO EXIT.... 

SUB #12,R2 POINT R2 TO START OF ENTRY 


PRINTS #EVTFO ;PRINT EVENT ENTRY HEADER 


MOVB (R2)+,R3 
MOVB (R2)+,EVTITCK 


PUT EVENT TYPE INTO R3 


SEQ 0076 


#1,-(SP) 


MEVIFO,-(SP) 
a tl 


MOVB (R2)+, EVTSEC ;PUT EVENT TIME (TICKS,SECS,MINS IN TEMP LOC.S) 


(R2)+,EVTMIN 


MOVB 
PRINTS #EVTFI,EVTMIN,EVISEC EVITCK,EVILST(R3) ;PRINT “— ae AND DESCRIPT. 
VTL 


ST(R3) ,-(SP) 


EVTMIN,-(SP) 
MEVTF1,~(SP) 
#5,-(SP) 

SP ,RO 
CSPNTS 
#i4.SP 


' ' 
i a a ed 
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3238 020112 000173 007634 JMP ARPTDSP(R3) :DISPATCH TO DECODING SECTION FOR SPECIFIC TYPE 
3321 020116 012237 007626 RPTTXQ: MOV (R2)+,EVTADD STORE MESSAGE ADDRESS FOR PRINTING 
3322 020122 012237 007630 MOV (R2)+,EVIBCT :STORE BYTE COUNT FOR PRINTING 
3323 020126 012203 MOV (R2)+,R3 :STORE MODEM STATUS FOR PRINTING 
3324 020130 PRINTS W#EVTFC,EVTADD,EVIBCT | ;PRINT ADDR,BYTE CNT 
3325 020130 013746 007630 MOV EVTBCT,-(SP) 
3326 020134 013746 007626 MOV EVTADD ,-(SP) 
3327 020140 012746 014757 MOV MEVTF2,-(SP) 
3328 020144 012746 000003 MOV #3,-(SP) 
3329 020150 010600 MOV SP,RO 
3330 020152 104416 TRAP CSPNTS 
3331 020154 062706 000010 ADD #10,SP 
3332 020160 004737 020634 JSR PC,RPTMSB :GO0 PRINT MODEM STATUS 
$33 020164 000137 017744 JMP RPT :GO BACK FOR NEXT EVENT ENTRY 
3335 020170 012237 007632 RPTDER: MOV (R2)+,EVTTMP GET ADDRESS OF DEVICE INFO MESSAGE 
33 020174 012237 007662 MOV (R2)+,DEV1 STORE DEVICE REG CONTENTS FOR PRINTING 
3337 020200 012237 007664 MOV (R2)+,DEV2 
3338 020204 PRINTS W#EVTFS.EVTTMP  ;PRINT DEVICE REG CONTENTS. 
3339 020204 013746 007632 Vv EVTTMP,=-(SP) 
3 020210 012746 015031 MOV WEVTF3,-(SP) 
3341 020214 012746 000002 MOV #2,~-(SP) 
3342 020220 010600 MOV SP ,RO 
3343 020222 104416 TRAP CSPNTS 
3344 020224 062706 000006 ADD #6,SP 
3345 020230 PRINTS W#EVTF3C,DEV1,DEV2 
2208 060630 013746 007664 MOV DEV2,-(SP) 
3347 020234 013746 007662 MOV DEV1,~(SP) 
3348 020240 012746 015043 MOV MEVTF3C,-(SP) 
3349 020244 012746 000003 MOV #3,-(SP) 
3350 020250 010600 MOV SP,RO 
3351 020252 104416 TRAP CSPNTS 
3352 020254 062706 000010 ADD #10,SP 
Seer 020260 000137 017744 JMP RPT :GO BACK FOR NEXT EVENT ENTRY 
3355 020264 005037 007662 RPTDVI: CLR DEVI 
3356 020270 005037 007664 CLR DEV2 CLEAR UPPER BYTES OF DEV1 & DEV2 BEFORE USE 
3357 020274 112237 007662 MOVB (R2)+*,DEV1 STORE SETUP OPERATION PARAMETERS FOR PRINTING 
3358 020300 112237 007664 MOVB (R2)+,DEV2 
3359 020304 012237 007666 MOV (R2)+,DEV3 
3360 020310 012237 007670 MOV (R2)+*,DEV4 
3361 020314 Or0e%6 MOV R2,-(SP) SAVE R2 ON THE STACK 
3362 020316 004737 021326 JSR PC, SHWOP :G0 PRINT MODE, MAINT-LOOP TYPE, PARAMTERS. 
$07 020322 012602 MOV (SP)+,R2 RESTORE R2 
364 020324 000137 017744 JMP RPT :GO BACK FOR NEXT EVENT ENTRY 
365 0203 012237 007626 RPTEOP: MOV (R2)+, EVTADD 
366 020334 012237 007630 MOV (R2)+, EVIBCT 
367 020340 012237 007632 MOV (R2)+,EVTITMP 
3368 020344 PRINTS @#EVTF4B,EVTADD,EVIBCT,EVT TMP PRINT ADDR, RXBYTES,CMPBYTES. 
$33 020344 013746 007632 MOV EVTTMP,-(SP) 
370 020350 013746 007630 MOV EVIBCT,-(SP) 
$37) 020354 013746 007626 MOV EVTADD ,-(SP) 
378 020360 012746 015302 MOV EVIE 4B,-(SP) 
$3) 020364 012746 000004 MOV #4,-(SP) 
374 020370 010600 MOV RO 
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CVCLHA.P11 25-JUL-89 10:26 DUMP EVENT LOG AND BASE TABLE SEQ 0078 


33/75 020372 104416 TRAP CSPNTS 


33/8 020374 062706 000012 ADD #12,SP 
3305 020400 000137 017744 JMP RPT ; THEN GO GET NEXT EVENT ENTRY 
3380 
3381 020404 012237 007636 RPTDDE: MOV (R2)+,EVTADD STORE MESSAGE ADDRESS FOR PRINTING 
3382 020410 012237 007630 MOV (R2)+,EVTBCT STORE BYTE COUNT FOR PRINTING 
3383 020614 012237 007632 MOV (R2)+,EVTTMP sSTORE TOTAL # OF CMP ERRORS 
3384 020420 PRINTS W#EVTF4,EVTADD,EVIBCT,EVTTMP ;PRINT ADDR, BYTE CNT, # CMP ERRS 
3385 020420 013746 007632 MOV EVTTMP,-(SP) 
3386 020424 013746 007630 MOV EVTBCT,<(SP) 
3387 020430 013746 007626 MOV EVTADD ,-(SP) 
3388 020434 012746 015102 MOV WEVTF4,-(SP) 
3389 020440 012746 000004 MOV #4 ,-(SP) 
3390 020444 010600 MOV SP,R 
3391 020446 104416 TRAP CSPNTS 
3392 020450, 062706 000012 ADD #12,SP 
seec 020454- 000137 017744 JMP RPT ;THEN GO GET NEXT EVENT ENTRY 
3395 020460 RPTDLE: 
3396 020460 012237 007626 RPTDCK: MOV (R2)*,EVTADD STORE MSG ADDR FOR PRINT 
3397 020464 012237 007630 MOV (R2)+, EVIBCT STORE BYTE COUNT 
3398 020470 012237 007632 MOV (R2)+,EVTTMP STORE BYTE COUNT COMP 
3399 020474 PRINTS W#EVTF4A,EVTADD,EVIBCT,EVT TMP sPRINT ADDR, RXBYTES, CMPBYTES. 
020474 013746 007632 MOV EVTTMP,-(SP) 
3401 020500 013746 007630 MOV EVTBCT,-(SP) 
8 020504 013746 007626 MOV EVTADD ,-(SP) 
03 020510 012746 015204 MOV #EVTF4A,=(SP) 
3404 020514 012746 000004 MOV #4,-(SP) 
3405 020520 010600 MOV SP,RO 
3406 020522 104416 TRAP CSPNTS 
on 020524 062706 000012 ADD #12,SP 
ott 020530 000137 017744 JMP RPT :THEN GO GET NEXT EVENT ENTRY 
3411 
3412 
3413 
3414 
3415 020534 012237 007632 RPTMSC: MOV (R2)+,EVTTMP 
3416 020540 PRINTS @#EVIFS.EVTTMP  =PRINT CHANGE TYPE 
3417 020540 013746 007632 MOV EVTTMP ,-(SP) 
3418 020544 012746 015031 MOV MEVTF3,-(SP) 
3419 020550 012746 000002 MOV #2,-(SP) 
3420 020554 010600 MOV SP RO 
3421 020556 104416 TRAP CSPNTS 
an5¢ 020560 062706 000006 ADD #6,SP 
23 020564 012203 MOV (R2)+,R3 :PUT O.D MODEM STATUS IN R3 FOR PRINTING 
24 020566 004737 020634 JSR PC, RPTMSB :G0 PRINT OLD MODEM STATUS 
25 020572 PRINTS #EVMOCG :G0 PRINT "‘CHANGED TO:"* 
sece 020572 012746 015444 MOV #EVMOCG,-(SP) 
27 020576 012746 000001 MOV #1,-(SP) 
28 020602 010600 MOV SP RO 
29 020604 104416 TRAP CSPNTS 
30 020606 062706 000004 ADD a4,SP 


eee ee 
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CVCLHA.P11 —-25=JUL-80 10:26 DUMP EVENT LOG AND BASE TABLE SEQ 0079 
3451 020612 012203 MOV (R2)+,R3 ;PUT NEW MODEM STATUS He R3 FOR PRINTING 
3432 020614, 004737 020634 JSR PC, RPTMSB :60 PRINT NEW MODEM STATUS 
$435 020620 000137 017744 RPTMSE: JMP RPT "THEN GO GET NEXT EVENT 
3435 
3436 020624 012604 ENDEVT: MOV (SP)+,R4 sRESTORE R4,R3,R2 
3437 020626 012603 MOVs (SP) +, R3 
3438 020630 012602 MOV (SP) +, R2 
oH 020632 000207 RTS PC ;RETURN TO CALLING ROUTINE 
3441 
3442 s2EPORT MODEM STATUS SUBROUTINE 
sda : PART OF STATISICAL REPORTING (DUMPING EVENT LOG) 
3445 020634 RPTMSB: PRINTS #EVMOHD ;PRINT MODEM STATUS HEADER 
3446 020634 012746 015467 MOV #EVMOHD , = (SP) 
3447 020640 012746 000001 MOV #1, -( SPS 
3448 020644 010600 MOV SP. RO 
3449 0206466 104416 TRAP CSPNTS 
3450 020650 062706 000004 ADD «#4, SP 
3451 020654 012704 007536 MOV #MOBITS,R4 ;MAKE R4 A POINTER TO MODEM SIG. BIT DEF. TABLE 
3452 020660 012705 007554 MOV #MOMSGS,R5 ;MAKE RS A POINTER TO MODEM MSG. POSITION TABLE 
3453 020664 005714 6$: TST (R4) ;SEE IF BIT AVAIABLE FROM DEVICE 
3454 020666 001004 BNE 7$ “BR IF THAT MODEM SIG. AVAIABLE 
3455 020670 112735 000130 MOVB #'xX,a(R5S)+ sELSE PUT ‘'x'' IN REPORT IF SIGNAL NOT AVAILABLE 
3456 020674 005724 TST (R4)+ : BUMP R4 TO POINT TO NEXT BIT a 
3457 020676 000407 BR 9$ 3GO0 SEE IF CHECKED ALL MODEM SIGNALS 
3458 020700 032403 7$: BIT (R4)+,R3 TIF THERE, SEE IF THAT BIT IN bevice® S ENTRY=1 
3459 020702 001403 BEQ 8$ :BR IF BIT (SIGNAL) VALUE =0 
3460 020704 112735 000061 MOVB #'1,a(R5)+ ;1F=1, PUT ‘'1'' IN REPORT MESSAGE 
3461 020710 000402 BR 9$ 3GO0 SEE IF ALL MODEM SIGNALS CHECKED 
3462 020712 112735 000060 8$: MOVB #'0,a(85)+ s1F BIT(SIGNAL)=0, PUT ‘‘0'' IN REPORT MESSAGE 
3463 020716 020427 007554 9$: CMP R4 ,#MOBITE ;SEE IF ALL BITS(SIGNALS) CHECKED 
3464 020722 002760 BLT 6$ sLOOP UNTIL ALL SIGNALS(BITS) CHECKED 
3465 020724 PRINTS #EVMOST ;THEN PRINT MODEM SIGNAL VALUE MESSAGE 
3466 020724 012746 015547 MOV #EVMOST,-(SP) 
3467 020730 012746 000001 MOV #1, - (SPS 
3468 020734 010600 MOV —SP-RO 
3469 020736 104416 TRAP CSPNTS 
3470 020740 062706 000004 ADD «#4, SP 
ofl 020744 000207 RTS PC RETURN TO EVENT DECODING 
3473 
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CVCLHA.P11 25-JUL=80 10:26 DUMP BYTES OR WORDS SEQ 0080 
34/4 .SBTTL DUMP BYTES OR WORDS 
3475 
3476 
3477 : 
3478 ; FUNCTIONAL DESCRIPTIO 
ot 4 ; DUMPSR = DUMP BYTES OR WORDS SUBROUTINE 
3481 ; THIS SUBROUTINE PRINTS THE CONTENTS OF THE LOCATIONS BETWEEN 
3482 ; A STARTING AND END ADDRESS IN LOCS. ‘‘STADD'' AND ‘'ENADD’ 
3483 ; THE WORD OR BYTE CONTENTS ARE PRINTED 8 TO A LINE WITH THE 
3484 : ADDRESS OF THE FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED 
3485 : BY A SEMICOLON. 
3486 . 
3487 : INPUTS: 
3488 3 STADD= STARTING ADDRESS (FIRST LOC. TO PRINT) 
3489 ; ENADD= END ADDRESS (LAST LOCATION TO DUMP) 
3490 : BYTBIT= 1 IF SUPPOSED TO PRINT ‘BYTES'' 
sp ; 0 IF SUPPOSED TO PRINT ‘WORDS"’ 
3493 : OUTPUTS: 
rbd ; CONTENTS OF A RANGE OF LOC.S PRINTED ON THE OPERATORS CONSOLE. 
3496 3 nner SEQUENCE : 
oped : SR PC,DUMPSR CALL DUMP BYTES SUBROUTINE 
3501 020746 013702 006472 DUMPSR: MOV STADD,R2 sSET Re uP TO STARTING ADDR. 
3502 020752 005003 DUMG : CLR R3 ;CLEAR R3 
3503 020754 PRINTF #BASM1,R2 “PRINT ADDRESS 
3504 020754 010246 MOV R2,-(SP) 
3505 020756 012746 014571 MOV #BASM1 ,-(SP) 
3506 020762 012746 000002 MOV #2,-(SP) 
3507 020766 010600 MOV SP,RO 
3508 020770 104417 TRAP CSPNTF 
3509 020772 2706 000006 ADD #6,SP 
3510 020776 005737 006476 DUM3: TST BYTBIT :1S THIS eyTE OR wORD 
3511 021002 001416 BEQ DuM1 “BR IF WORD 
3512 021004 112237 006516 MOVB (R2)+, TEMP :MOV BYTE TO TEMP 
3513 021010 PRINTF #BASM3,<B,TEMP> :PRINT BYTE 
3514 021010 005046 CLR -(SP) 
3515 021012 153716 006516 BISB TEMP, (SP) 
3516 021016 012746 014553 MOV #BASM3,-(SP) 
3517 021022 012746 000002 MOV #2,-(SP) 
3518 021026 010600 MOV SP,RO 
3519 021030 104417 TRAP CSPNTF 
3520 021032 062706 000006 ADD #6,SP 
3521 021036 000411 BR DUM2 
3522 021040 DUM1: PRINTF #BASM2,(R2)+ :PRINT WORD 
3523 021040 012246 MOV (R2)+,-(SP) 
3524 0210462 012746 014562 MOV #BASM ,- (SP) 
3525 021046 012746 000002 MOV #2,-(SP) 
3526 021052 010600 MOV SP RO 
3527 021054 104417 TRAP CSPNTF 
3528 021056 062706 000006 ADD #6,SP 
3529 021062 020237 006474 DUM2: (MP R2,ENADD s COMPARE FOR LAST ADD 
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=, 
S 


SARA 


Ww 
~ 


;1F DONE exit 

TELSE BUMP R3 

sHAVE WE vaires 8 ACCROSS 

;1F SO GO BACK 4 

TELSE GO BACK ue PRINT ANOTHER 
s;BYTE OR WORD 

RETURN TO CALLER 
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CVCLHA.P11 25-JsUL-80 10:26 UPDATE TOTAL CHAR. COUNT SUBROUTINE SEQ 0082 
i256 SBTTL UPDATE TOTAL CHAR. COUNT SUBROUTINE 
3540 soe 
3541 3; FUNCTIONAL DESCRIPTION: 
3542 : UPDATES TOTAL CHAR. COUNT TOTCC BASED ON CURCC. 
3543 : vast MESSAGE IS TRUNCATED TO FIT INT oT HE 
3544 3 BUFFER IF TOTAL CHAR. COUNT EXCEEDS ‘BUFLIM’’ A MESSAGE 
S202 ; IS PRINTED TELLING THE OPERATOR THE TRUNCATION OCCURED. 
3547 : INPUTS: 
3548 : CURCC= CHAR. COUNT OF MESSAGE BEING ADDED 
eee : TOTCC= TOTAL CHAR COUNT OF BUFFER ITS BEING ADDED TO 
3551 : OUTPUTS: 
R238 : MESSAGE TO OPERATOR IF MESSAGE TRUNCATED TO FIT 
3554 >; FUNCTIONAL SIDE EFFECTS: 
3555 : LOCATION ‘‘TEMP’’ USED FOR CALCULATIONS 
3556 ; CALLING SEQUENCE: 
3557 : JSR PC,ADCC ;UPDATED TOTAL CHAR. COUNT 
3558 so 
336 
3561 021104 063737 006502 006512 ADDCC: ADD CURCC, TOTCC ;ADD CURRENT TO TOTAL 
3562 021112 022737 001000 006512 CMP #BUFLIM,TOTCC : COMPARE TO ‘BUFLIM" 
ge: 021120 103027 BHIS ADDC1 IF NOT MORE THEN ‘BUFLIM' EXIT 
$209 ; PRINT MESSAGE AND TRUNCATE COUNT 
3567 021122 PRINTF #MSGTRU 
3568 021122 012746 013524 MOV #MSGTRU,-(SP) 
3569 021126 012746 000001 MOV #1 ,-(SP) 
3570 021132 010600 MOV SP ,RO 
3571 021134 104417 TRAP CSPNTF 
3572 021136 062706 000004 ADD #4 ,SP 
3573 021142 163737 006502 006512 SuB CURCC, TOTCC :SUB CURRENT FROM TOTAL 
3574 021150 012737 001000 006516 MOV #BUFLIM, TEMP sMOV ‘‘BUFLIM’’ TO TEMP 
3575 021156 163737 006512 006516 SUB TOTCC, TEMP :SUB TOTAL FROM ‘'BUFLIM'' 
3576 021164 013737 006516 006502 MOV TEMP, CURCC ;AND ESTABLISH NEW CURRENT 
3577 021172 063737 006502 006512 ADD CURCC,TOTCC ADD ‘‘ADJUSTED CURRENT'' TO TOTAL CHAR. CNT. 
3578 021200 000207 ADDC1: RTS PC RETURN TO CALLER 
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BUILD MESSAGE BUFFERS SUBROUTINE 
BUILD MESSAGE BUFFERS SUBROUTINE 


USING THE POINTER, BYTE COUNT, 


; INPUTS: 
; CURCC= 


CPTIR= 


; FUNCTIONAL DESCRIPTION: 
; BLDBUF -- 


BUILD POINTER TABLE AND BUFFERS 
THIS SUBROUTINE ADDS A MESSAGE TO THE TRANSMIT OR EXPECT when 


AND ADDRESS PASSED TO IT 


CHAR. COUNT OF MESSAGE TO BE ADDED 

CURADD= ADDRESS OF MESSAGE TO BE ADDED 

ADDRESS 1 + a + Fes WORD WHERE MESSAGE POINTERS ARE 
9 UIL 

MSGTYP= VALUE TO USE AS AN INDEX TO FIND SOURCE OF MESSAGE DATA 

INDEX INTO DMSGCT() AND DMSGAD(). 


A MESSAGE ADDED TO EITHER TXBUF OR CMPBUF 
APPROPRIATE POINTERS IN PTRTAB POINTER TABLE 


; CALLING SEQUENCE: 


JSR PC ,BLOBUF 


R2,-(SP) 
R3,-(SP) 
CPTR,R2 


CURADD, (R2)+ 
CURCC,(R2)+ 
R2,CPTR 
MSGTYP,R2 

R2 


CURADD, TEMP 
CURCC, ‘“ 
CURADD, 


R3 
DMSGCT(R2), TEMP2. 


DMSGAD(R2) ,R4 
R4,TEMP2 
(R4)+,(R3)¢ 
R3,TEMP 
BLDBE x 

R4 ,TEMP2 
BLDB2 


BLOB3 

CURCC ,CURADD 
(SP)+,R3 
(SP)+,R2 

PC 


;BUILD MESSAGE IN BUFFER AND ADD PTRS. 


;SAVE R2 AND R3 ON THE STACK 


;PUT CURRENT ADD ON POINTER TAB 

;PUT CURRENT CC ON POINTER TAB 

;PUT UPDATED R2 BACK TO CURRENT POINT 
;GET MESSAGE TYPE TO USE AS INDEX 
;DOUBLE FOR WORD INDEX 

;MOVE CURRENT ADD TO TEMP 


;ADD CHAR COUNT TO IT TO GET END 
;SET R3 TO CURRENT START ADD 

;GET BYTE COUNT 
PUT STARTING FROM ADD IN R4 
;ADD IT TO TEMP2 TO GET END OF FROM 
:MOV BYTE FROM PATTERN TO BUFFER 


STALL DONE? 

s1F SO EXIT 

31S PATTERN COUNT EXPIRED 
iTf SO GO START AGAIN 


IF “¥ md Bact’ BYTE 
BUMP C 
RESTORE ne AND R2 


;RETURN TO CALLER 


SEQ 0083 
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te .SBTTL SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS 

3633 p++ 

3634 ; FUNCTIONAL DESCRIPTION: 

3635 : SHWOP = SHOW MODE OF OPERATION, LOOP, QULAIFIERS 

so38 ; PRINTED ON THE OPERATOR'S CONSOLE. 

3638 : INPUTS: 

3639 ; DEV1= MODE TYPE (MODTYP) 

3640 ; DEV2= MAINT LOOP TYPE (MLTYP) 

3641 : DEV3= ‘'RUN PASS’ COUNT (RPASS) = COUNT DCWN 

seg : DEV4=  PARAMTERS WORD (PARAM) 

3644 ; IMPLICIT INPUTS: 

3645 ; MODES= TABLE OF ADDRESSES OF MODE NAME STRINGS 

sis z LOOPS= TABLE OF ADDRESSES OF LOOP TYPE NAMES 

3648 ; CALLING SEQUENCE: 

3649 ; JSR PC,SHWOP 

ist i 

3652 021326 013702 007662 SHWOP: MOV DEV1,R2 :GET THE MODE TYPE IN &2 

3653 021332 006302 ASL R2 :MAKE IT A WORD TABLE OFFSET 

3654 021334 010237 003064 006516 MOV MODES(R2),TEMP ;GET ADDRESS OF MODE-IN-ASCII 

3655 021342 013702 007664 MOV DEV2,R2 :GET MAINTENANCE LOOP TYPE 

3656 021346 006302 ASL R2 

3657 021350 012737 013037 006524 MOV #L POO, TEMPS :LOAD TEMP3 TO POINT TO ‘'/LOOP="' 

3658 021356 00570 TST R2 : SEE IF /LOOP=XXXXX OR NONE 

3659 021360 00100 BNE 10$ ; BR IF /LOOP= OF SOME KIND 

3660 021362 012737 013036 006524 MOV #LPO, TEMPS ‘IF NO LOOP THEN DON'T PRINT ‘‘/LOOP="' 

3661 021370 016237 003102 006520 10$: MOV LOOPS(R2 TEMP1 :GET ADDRESS OF LOOP-IN-ASCII 

3662 021376 013737 007666 006522 MOV DEV3, TEMPS “GET NUMBER OF PASSES 

3663 021404 PRINTS #SHFO, ice TEMPS. TEMP1, TEMP2 

3664 021404 013746 006522 MOV TEMP2 ,-(SP) 
3665 021410 013746 006520 MOV TEMP1,-(SP) 
3666 021414 013746 006524 MOV TEMP3,-(SP) 
3667 021420 013746 006516 MOV TEMP, =(SP) 
3668 021424 012746 013607 MOV #SHFO,-(SP) 
3669 1430 012746 000005 MOV #5 ,-(SP) 
3670 021434 010600 MOV SP,R 

3671 1436 104416 TRAP CSPNTS 
se78 021440 062706 000014 ADD #i4,SP 
3674 021444 005002 CLR R2 NOW SET UP FOR QUALIFIERS IN ASCII 

3675 021446 012737 013116 006516 MOV #PST, TEMP 

3676 021454 032737 000001 007670 BIT #STATB,DEV4 :SEE IF /STATUS OR /NOSTATUS 

3677 021462 001003 BNE 1$ :BR IF /STATUS 

3678 0214 012737 013114 006516 MOV #PNST, TEMP 

3679 021472 012737 013127 006520 1$: MOV #PCK, TEMP) 

3680 021500 032737 000002 007670 BIT #DATCKB,DEV4 SEE IF /CHECK OR /NOCHECK 

3681 021506 001003 BNE 23 :BR IF /CHECK 

3682 021510 012737 013125 006520 MOV #PNCK, TEMP) 

3683 021516 012737 013137 006522 2%: MOV #PEC,TEMP2 

3684 021524 032737 000004 007670 BIT #ECHOB,DEV4 SEE IF /ECHO OR /NOECHO 

3685 021532 001003 BNE 3$ :BR IF /ECHO 

3686 021534 012737 013135 006522 MOV #PNEC, TEMP2 
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3667 

3688 021542 012737 013146 006530 38: MOV #PMS, TEMPS 

3689 021550 032737 000010 07670 BIT #MOCHK ,DEV4S sSEE IF /MODEM OR /NOMODEM 

3690 021556 001003 BNE 5$ :BR IF MODEM 

463) 021560 012737 013144 006530 MOV #PNMS, TEMPS 

3693 

3694 021566 5$: PRINTS #SHF1,TEMP,TEMP1,TEMP2, TEMPS :,TEMP3, TEMPS *#RFUCe 

3695 021566 013746 006530 MOV TEMPS ,-(SP) 
3696 021572 013746 006522 MOV TEMP2 ,-(SP) 
3697 021576 013746 006520 MOV TEMP1,-(SP) 
3698 021602 013746 006516 MOV TEMP, =(SP) 

99 021606 012746 013645 MOV #SHF1,-(SP) 

3 021612 012746 000005 MOV #5,-(SP) 
3701 021616 0106 MOV SP ,RO 

3702 021620 104416 TRAP CSPNTS 
3703 021622 062706 000014 ADD #14,SP 

3704 021626 000207 RTS PC RETURN 
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aur ~SBTTL TRAVERSE COMMAND LINE SUBROUTINES 
3709 ;ee 
4710 : P$TRV SUBROUITNE 
3712 “PARSE THE COMMAND LINE SUBROUTINE 
3713 ;TAKE ACTIONS (VIA ACTION TREE) AS PARSING LINE 
3714 [PARSING DIRECTIONS FROM "CLI PARSING NODES'' 
ge ; REGS USED: 
3717 ; R1,R5=SCRATCH PSNUM=NUMERIC CODE FROM DATA 
3718 ; R2= ACTION CODE PARAMETER FROM TREE 
3719 ; R3=PARSE TREE POINTER 
3720 ; R4=INPUT STRING POINTER 
3721 ; CALLING SEQUENCE: 
3722 ; JSR PC, PSTRV 
3723 j= 
3724 
3725 021630 PS$TRYV: 
3726 021630 013704 003114 MOV P$BUFA,R4 
3727 021634 013703 003116 MOV PSTREE,R35 
3728 021640 105714 P$TRS: TSTB (R4) ;SEE IF ANY LHARS LEFT IN INPUT STRING 
3729 021642 001441 BEQ PSEXIT ;BR IF NO 
3730 021644 121327 000013 CMPB (R3),#11. :SEE IF SPECIAL CLI CHAR CODE OR ASCII 
3731 021650 003023 BGT 208 “BR IF REGULAR ASCII CHAR. 
3732 021652 111305 MOVB (R3),R5 :GET SPECIAL CHAR CODE INTO RS 
3733 021654 006305 ASL RS 
3734 021656 016505 021672 MOV 10$(R5),R5 sBUILD TRAVERSE ROUTINE ADDRESS 
3735 021662 2705 021672 ADD #108, 
3736 021666 004715 JSR PC, (R5) sJSR TO SPECIAL CLI TRAVERSE ROUTINE 
ete 021670 000763 BR P$TRS 7GO SEE IF MORE OF STRING LEFT 
3739 ; 
3740 021672 000114 108: . WORD TRVERR-10$ ; TRAVERSE TABLE FOR ‘CLI FUNTIONS"’ 
3741 021674 000134 .WORD TRVEXI-10$% 27 
3742 021676 000152 WORD TRVBR-10$ i2 
3743 00 000162 WORD TRVBIF-10% 33 
3744 021702 000204 WORD TRVSPA-10$ 34 
3745 021704 000270 WORD TRVNUM-10$ :3 
3746 0217 000604 WORD TRVALP-10$ 76 
3747 021710 00065 WORD TRVALN-10$ sf 
3748 021712 000270 WORD TRVOCT-10$ 78 
3749 021714 000256 .WORD TRVDEC-10% 39 
gree 021716 000736 . WORD TRVSTR-10$ 310 
$736 sNOT A SPECIAL CODE 
3754 021720 121314 20$: CMPB (R3),(R4) sSEE IF o date CHAR OF STRING IS A MATCH 
3755 021722 001403 BEQ 228 ‘BR IF A hy TCH 
3756 021724 004737 021770 JSR PC, TRVBRC ;1f NOT A MATCH, GO TAKE MISS BRANCH 
3757 021730 000743 BR PSTRS ; wy GO BACK PT'G TO MISS NODE 
3758 021732 004737 021750 223: JSR PC, TRVACT ;1F A MATCH, GO DO ACTION DEFINED BY 
3759 021736 062703 000004 ADD #4 ,R3 ; ACTION CODE IN CLI NODE, THEN 
3760 - ADJUST PTR TO NEXT CLI N 
3761 021742 005204 INC ‘ADJUST BUF PTR TO NEXT CHAR IF MATCH 


RG 
3762 021744 000735 BR PSTRS 
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3763 

ge 021746 000207 PSEXIT: RTS PC :RETURN FROM PARSER 

3766 J teem meee ene m ew ce wenn ce ww ence wenn ncncencscecsncscscsccossnsocoocencooncees 

3767 

3768 :GOTO USER ACTION ROUTINE 

3769 021750 116302 000001 TRVACT: MOVB 1(R3),R2 :GET ACTION CODE FROM CLI NODE 

3770 021754 042702 177400 BIC 177460 R2 ‘CLEAR ANY SIGN EXTENSION 

3771 021760 013705 003120 MOV PSACT,RS5 :GET ADDRESS OF CLI ACTION ROUTINE 

3772 021764 004715 JSR Pc, (R5) :GO0 DO ACTION DEFINED BY CODE 

gre 021766 000207 RTS PC =RETURN TO CALLING CODE 

3775 ; TAKE BRANCH IN TREE 

3776 021770 016305 000002 TRVBRC: MOV 2(R3) RS ;GET BRANCH DISPLACEMENT FROM TREE 

3777 021774 060503 ADD R5,R3 : AND POINT R3 TO THE ‘MISS‘’ NODE 

qn 021776 000207 RTS PC : RETURN TO PS$TRV 

3780 :NO BRANCH TAKEN 

3781 022000 062703 000004 TRVNOB: ADD #4 ,R3 THINGS OK, UPDATE R3 TO POIN: TO NEXT 

ere 022004 000207 RTS PC ‘ NODE AND RETURN TO PSTRV 

3784 j Swoceceecewcescoscccocococccocccsosescccnessoonscosscocosossoncosoosesscceee 

3785 022006 004737 021750 TRVERR: JSR PC, TRVACT TAKE ERROR ACTION 

3786 022012 112737 177777 003131 MOVB #-1,P$GDBD “SET ERROR RETURN FLAG 

3787 022020 005726 TST (SP) + :GET RID OF ‘JSR PUSH TO TRVERR’’ 

He 022022 000137 021746 JMP PSEXIT [RETURN DIRECT TO EXIT OF PSTRV ROUTINE 

3790 022026 004737 021750 TRVEXI: JSR PC. TRVACT TAKE EXIT ACTION 

3791 022032 105037 003131 CLRB P$GDBD ‘SET GOOD/BAD FLAG TO ‘‘SUCCESS «ey 

3792 022036 005726 TST (SP)+ ‘GET RID OF ‘JSR PUSH TO TRVEXI" 

iad, 022040 000137 021746 JMP PSEXIT sRETURN DIRECT TO EXIT OF PSTRV ROUTINE 

3795 022044 004737 021750 TRVBR: JSR PC, TRVACT :GO0 TAKE BRANCH ACTION 

gine 022050 000137 021770 JMP TRVBRC 

3798 022054 004737 021750 TRVBIF: JSR PC, TRVACT 

37 022060 105737 003131 TSTB P$GDBD SEE IF PSGDBD SET OR CLEARED BY ACTION 
022064 001402 BEQ 1$ :IF CLEAR FALL THRU TO 4a. NODE 

3801 022066 000137 021770 JMP TRVBRC *ELSE TAKE THE 'MISS'’ BRA 

son 022072 000137 022000 1$: JMP TRVNOB : JUST UPDATE TO NEXT NODE” 4 THINGS OK 

3804 022076 005005 TRVSPA: CLR RS :CLEAR "‘SPACE OR TAB FOUND’’ FLAG 

3805 022100 121427 000011 1$: CMPB (R4),#11 *SEE IF CHAR. IN CMD LINE= TAB 

3806 022104 001003 BNE 2% :BR IF NO, NOT A TAB 

3807 022106 005204 INC R4 > INC INPUT STRING POINTER 

3808 022110 005205 INC R5 ; INDICATE A TAB FOUND 

ere 022112 000772 hh 1$ G0 CHECK NEXT CHAR 

3535 022114 121427 000040 2%: CMPB (R4) , #40 :SEE IF CHAR. IN CMD LINE= SPACE 

3812 022120 001003 BNE 10% [BR IF NO, NON-SPACE OR NON-TAB CHAR. 

3813 022122 005204 INC R4 “INC INPUT STRING POINTER 

3814 022124 005205 INC R5 > INDICATE A SPACE FOUND 

3815 O55 146 000764 bee 1$ *GO CHECK NEXT CHAR 

3816 0221 005705 108: TST R5 see If ANY SPACES OR TABS FOUND 

3817 022132 001404 BEQ 15% R IF NO, TAKE NO ACTION 

3818 022134 004737 021750 JSR PC, TRVACT ‘60 TAKE ACTION IF ANY FOUND 
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3819 022140 000137 022000 JMP TRVNOB JUST GO UPDATE R3 TO NEXT NODE IF OK 
hy 022144 000137 021770 15$: JMP TRVBRC ; TAKE BRANCH (MISS) IF NONE FOUND 
3822 
3823 022150 012737 000012 003126 TRVDEC: Qt #10. ,PSRADX SUSE DECIMAL AS RADIX AND ASSUME + 
3824 022156 000137 022170 TRVNMA 
3825 022162 TRVOCT: sUSAME AS TRVNUM SINCE DEFAULT RADIX 1S OCTAL) 
3826 022162 012737 000010 003126 TRVNUM: MOV #8. ,PSRADX USE OCTAL AS vp l AND ASSUME + 
3827 022170 005005 TRVNMA: CLR Ge “CLEAR DIGIT COUNTER 
3828 022172 121427 000053 CMPB (R4) a+ ; SEE iH THERE'S A + SIGN THERE 
3829 022176 001001 BNE 108 ; BR IF NO 
3830 022200 000406 Be 11$ ; ELSE " pORADK ALREADY SAYS +, JUST BR 
3831 022202 121427 000055 19$: CMPB (R4),#'= i SEE IF THERE'S A = SIGN THERE 
3832 022206 001004 BNE 1$ ; BR IF NO 
3833 022210 112737 177777 003127 MOVB #-1,PSRADK+1 ‘SET ‘MINUS FLAG'’ (HI BYTE OF PSRADX) 
te 022216 005204 118: INC RG ‘BUMP R4 TO POINT TO FIRST CHAR 
3836 022220 121427 000060 1$: CMPB (R4) ,#60 :SEE IF CHAR. LESS THAN A ‘'0"’ 
3837 022224 002434 BLT 2$ :BR IF YES (NOT NUMERIC) 
3838 022226 121427 000067 CMPB (RG) #67 ; SEE IF CHAR. GREATER THAN A ‘'7"' 
3839 022232 003426 BLE 13% BR IF YES 
3840 022234 123727 003126 000012 CMPB PSRADX, #10. SEE IF IN DECIMAL MODE 
3841 022242 001417 BEQ 128 : BR IF YES (CAN USE HIGHER LIMIT) 
3842 022244 121427 000071 CMPB (R4) #71 “SEE IF DIGIT WAS A 8 OR 9 
3843 022250 003022 BGT 2$ ‘BR IF NON-NUMERIC 
3844 022252 PRINTF #CLIBRX sELSE WAS A 8 OR 9 WHEN = OCTAL RADIX 
3845 022252 012746 011571 #CLIBRX,-(SP) 
3608 6g5$28 012746 000001 nov #1.-(SP) 
022262 010600 MOV SP,RO 

3848 022264 104417 TRAP CSPNTF 
3849 022266 062706 000004 ADD #4,SP 
3850 022272 112737 177777 003131 MOVB #-1,P$GDBD SET ERROR RETURN FLAG 
HH 022300 000474 HA 5$ ; PRINT ERROR AND TAKE MISS 
3853 022302 121427 000071 12$: CMPB (R4) #71 SEE IF CHAR. GREATER nan A ‘'9"' 
3854 022306 00300 BGT 2% :BR IF YES (NOT NUMERIC 
3855 022310 005204 13$: INC R4 :UPDATE CMD LINE PTR iS NEXT CHAR. 
3856 022312 005205 INC R5 : INDICATE A NUMERIC FOUND 
444 022314 000741 BR 1$ =GO LOOK AT NEXT CHAR. 
3859 022316 005705 2%: TST R5 ;SEE IF FOUND ANY NUMERICS 
3860 022320 1464 BEG 5$ “BR IF NO, TAKE ‘MISS’ BRANC 
3861 022322 010401 MOV R4,R1 “GET POINTER TO START OF NUMERIC STRING 
3862 022324 160501 SUB R5,R1 
3863 022326 005037 003124 CLR PSNUM ;CLEAR LOC. WHERE VALUE WILL BE STORED 
3864 022332 112102 3$: MOVB (R1)+,R2 :GET ASCII CHAR AND CONVERT IT TO A #@ 
3865 022334 162702 000060 SUB #60,R 
3666 022340 006337 003124 ASL PSNUM SHIFT CURRENT VALUE TO MAKE ROOM 
3867 022344 103437 BCS 7$ ERROR IF NUMBER TOO BIG 
3868 022346 013737 003124 003122 MOV PSNUM,PSCNT SAVE FOR LATER IN CASE DECIMAL RADIX 
$550 022354 337 003124 ASL PSNUM 

70 022360 193431 BCS 7$ ERROR IF NUMBER TOO BIG 

71 022362 006337 003124 ASL PSNUM 

72 022366 103426 BCS 7$ ERROR IF NUMBER TOO BIG 
3873 022370 123727 003126 000012 CMPB PSRADX,#10. SEE IF DECIMAL RADIX 

022376 0010 4$ sBR IF NOT EQUAL 
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38/5 022400 063737 003122 003124 ADD PSCNT,PSNUM 

3876 022406 103416 BCS 7$ sERROR IF NUMBER TOO BIG 

3877 022410 060237 003124 4$: ADD R2,P$NUM 

3878 022414 103413 BCS 7$ ERROR IF NUMBER TOO BIG 

3879 022416 005305 DEC wS 

3880 022420 001344 BNE 3$ 

3881 022422 105737 003127 TSTB PSRADXK+1 see IF NUM WAS PRECEDED BY A = SIGN 
3882 022426 001402 BEQ 15$ BR IF NO 

3883 022430 005437 003124 NEG P$NUM : ELSE NEGATE THE NUMBER BEFORE LEAVING 
3884 0224 004737 021750 15$: JSR PC, TRVACT ‘SINCE NUMERIC FOUND, GO TAKE ACTION 
ert 022440 000137 022000 JMP TRVNOB ‘60 POINT R3 TO NEXT NODE 

7 022444 7$: PRINTF #CLINBG ;PRINT NUMBER TOO BIG ERROR 

3888 022444 012746 011547 MOV #CLINBG,-(SP) 
3889 022450 012746 000001 MOV #1,-(SP) 
3890 022454 010600 MOV SP.RO 
3891 022456 104417 TRAP CSPNTF 
3892 022460 062706 000004 ADD #4 ,SP 
3893 0224664 112737 177777 003131 MOVB #-1,P$GDBD :SET ERROR RETURN FLAG 

gaye 022472 000137 021770 S$: JMP TRVBRC ; TAKE 'MISS'' BRANCH 
3896 
3897 022476 005005 TRVALP: CLR R5 CLEAR ALPHA FOUND FLAG 

3898 022500 121427 000101 1$: CMPB (R4),#101 sSEE IF CHAR. LESS THAN A “‘A’' 

3899 022504 002406 BLT 2% ‘BR IF YES (NOT ALPHA) 

3900 022506 121427 000132 CMPB (RG) #132 SEE IF CHAR. GREATER THAN A ‘'7"' 

3901 022512 00300 BGT 2$ “BR IF YES (NOT ALPHA) 

902 022514 005204 INC R4 ‘UPDATE CMD LINE PTR TO NEXT CHAR 

903 022516 005205 INC RS ; INDICATE AN ALPHA WAS FOUND 

3904 022520 000767 BR 1$ :GO LOOK AT NEXT CHAR. 

3905 022522 005705 2$: TST RS ‘SEE IF ANY ALPHA'S WERE FOUND 

3906 022524 001404 BEQ 3$ :BR IF NO 

3907 022526 004737 021750 JSR PC, TRVACT > IF ANY FOUND TAKE ACTION 

3908 022532 000137 022000 JMP TRVNOB ; THEN UPDATE R3 TO NEXT NODE -NO BRANCH 
ere 022536 000137 021770 3$: JMP TRVBRC s;NONE FOUND, TAKE MISS BRANCH 
3911 022542 005005 TRVALN: CLR R5 ;CLEAR ALPHANUM FOUND FLAG 

3912 022544 121427 000060 10$: CMPB (R4) , #60 sSEE IF CHAR. LESS THAN A ‘‘O"' 

3913 022550 002417 BLT 2$ ‘BR IF YES (NOT NUMERIC OR m.pua) 

3914 022552 121427 000072 CMPB (R4) #72 SEE IF CHAR. GREATER THAN A ‘'9"' 

3915 022556 003003 BGT 1$ ‘BR IF YES (NOT NUMERIC) 

3916 022560 005204 INC R4 sUPDATE CMD LINE PTR TO NEXT CHAR. 

3917 022562 005205 INC RS S INDICATE A NUMERIC FOUND 

3918 022564 000767 BR 10$ :GO LOOK AT NEXT CHAR. 

3919 022566 121427 000101 1$: CMPB (R4),#101 SEE IF CHAR. LESS ree A ‘A’ 

3920 022572 002406 BLT 2% [BR IF YES (NOT ALPHA be 

3921 022574 121427 000132 CMPB (RG) #132 :SEE IF CHAR. GREATER. THAN A “'7"' 

922 022600 003003 BGT 2% ‘BR IF YES (NOT ALPHA) 

923 022602 005204 INC R4 ‘UPDATE CMD LINE PTR TO NEXT CHAR 

924 022604 005205 INC bee, : INDICATE AN arm FOUN D 

925 022606 000756 Ble 108 *GO LOOK AT NEXT C 

926 022610 005705 23: TST R5 :SEE IF ANY TT anu § WERE FOUND 

927 022612 001404 BEQ 3$ :BR IF NO 

928 022614 004737 021750 JSR PC, TRVACT ;1F ANY FOUND TAKE ACTION 

3929 022620 000137 022000 JMP TRVNOB ; THEN UPDATE R3 TO NeXT NODE -NO BRANCH 
3930 022624 000137 021770 3$: JMP TRVBRC ‘NONE FOUND, TAKE MISS BRANCH 
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3951 
3932 
3933 
3934 022630 010401 TRVSTR: MOV —s RG, RI POINT R1 TO CMD STRING 
3935 022632 010305 MOV —sR3.. RS 
3936 022634 062705 000006 ADD —s- #6, RS ;POUNT RS TO MATCH STRING FROM CLI NODE 
3937 022640 005037 003122 CLR —s PSCNT CLEAR CHAR MATCH COUNT 
3938 022664 105715 2s: TSTB (RS) :SEE IF END OF MATCH STRING YET 
3939 022646 001411 EQ 0$ 
3940 022650 105711 R’ 
3941 022652 001407 0 
3942 022654 121115 
3943 022656 001005 BNE BR IF N 
3944 022660 005237 003122 INC PSCNT {RATCH CINCREMENT MATCH COUNT 
3945 022664 005201 INC RI [UPDATE STRING POINTERS 
3946 022666 005205 INC RS 
3947 022670 000765 BR 2$ ;BR TO CONTINUE CHECKING CHARS. 
3949 022672 005737 003122 10$: ‘TST PSCNT ;WHEN DONE SEE IF ANY MATCHES FOUND 
3950 022676 001406 BEQ 15$ BR IF NO, GO TAKE THE MISS BRANCH 
3951 022700 010104 MOV —sR1, RG :POINT CMD POINTER TO END OF STRING & 
3952 022702 004737 021750 JSR PC TRVACT IF A MATCH FOUND, GO DO MATCH ACTION 
3953 022706 066303 000004 ADD —s- 4 (R3) , R3 UPDATE R3 TO NEXT NODE (NO BRANCH) 
3954 022712 000207 RTS —s PL : (NO RETURN THRU TRVNOB SINCE DIFFERNT 
3955 : DISPLACEMENT DUE TO MATCH STRING) 
$956 022714 000137021770 15$: MP TRVBRC : GO TAKE BRANCH 
3958 (PARSED OK), -1 IF ILL CMD..... 
3959 Sa ee eS Sa 
3960 


( 
B 1 :BR YES 
TSTB (Ri) ; SEE IF END OF CMD LINE YET 
BEQ 10$ BR IF YES 
CMPB (R1),(R5) 7 SEE My CHARACTERS MATCH 
10% 0 
! 


i = a ———— 
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3961 -SBTTL REPORT CODING SECTION 


pee 
3965 ; THE REPORT CODING SECTION CONTAINS THE 
He] ; ‘'PRINTS'' CALLS THAT GENERATE STATISTICAL REPORTS. 


720 BGNRPT 
720 LSRPT:: 


3973 022720 004737 017676 JSR PC,REPORT ;CALL SUBROUTINE TO DUMP EVENT LOG 
3974 ; AND BASE TABLE 


3979 022724 ENDRPT 
3980 022724 L10010: 
3981 022724 104425 TRAP C$RPT 


i cuditenniettiehdamionehesiiciiatiameaiiaaieaiane 






CVCLHA DPV-11 DASA COMM. LINK TEST 
CVCLHA.P11 





022726 
022726 


022726 
022730 
022732 


022734 





25-JUL-80 10:26 


177777 
177777 
177777 


MACY11_ 30A(1052) 
PROTECTION TABLE 


-SBTTL PROTECTI 
3; + 


; THIS TABLE IS 
; TO PROTECT THE 


BGNPROT 


ENDPROT 


B 8 
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ON TABLE 


USED BY THE RUNTIME SERVICES 
LOAD MEDIA. 


LSPROT:: 
sOFFSET INTO P=TABLE FOR C DRESS 
sOF FSET INTO P=TABLE FOR MASSBUS ADDRESS 
sOFFSET INTO P=TABLE FOR D 


SEQ 0092 






































CVCLHA.P11 


022734 
022734 


022734 


023010 
023014 


023020 
0 


012737 


012700 
104447 


103417 


012700 
104447 


103513 


012700 
104447 


103002 
000137 


012700 
104447 


103521 
000523 


005037 
005037 


012702 


012700 
104462 


012700 
104462 
010001 


103017 
004737 
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177777 =006544 


000040 


000037 


000036 


023442 


000035 


006544 
006604 


006600 
000114 


017016 


000100 


000120 


017016 


006610 


MACY11 30A(1052) 


C 
25-JUL-80 


INITIALIZE SECTION 


»SBTTL 


START: 


S2: 


p++ 
: pe INITIAL 
T THE BEGI 


INITIALIZE SECTION 


IZE SEC 
INNING OF EACH P 


BGNINIT 


MOV #-1 ,RESFLG 
READEF #EF.START 
BCOMPLETE START 
READEF #EF.RESTART 


BCOMPLETE RESTRT 
READEF #EF.CONTINUE 


BNCOMPLETE $1 


NDIT 


MP E 
READEF #EF .NEW 


BCOMPLETE NEW 
BR GETPRM 


CLR RESFLG 
CLR CLKVEC 


MOV #CLKCSR,R2 
CLOCK L,R&1 


BNCOMPLETE S2 


JSR PC,CLKSET 
MOV oh Se. Claes 


BR RESTRT 
CLOCK P,RI1 
BNCOMPLETE $3 


JSR PC,CLKSET 


8 
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SEQ 0093 


ECTION Sy ts nny THE CODING THAT IS PERFORMED 


LSINIT:: 


;SET RESTART FLAG 
;1F HERE CAUSE OF START,DO SOME INIT 
MOV aie RO 


TRAP C$R 
BCS START 
;1F HERE CAUSE OF RESTART, DO SOME INIT 
MOV WEF RESTART ,RO 
TRAP CSREFG 


BCS RESTRT 
;SEE IF WE'RE HERE CAUSE OF A CONTINUE 
MOV #EF .CONTINUE ,RO 
TRAP CSREFG 
;BR IF NOT HERE ‘CAUSE 
7 JMP IF HERE CAUSE OF A Sa 
;SEE IF THIS IS A ‘NEW P 
PMO WEF .NEW,RO 
TRAP CSREFG 


:IF YES, BR AROUND LOGUNIT # SETUP 
BCS NEW 


;CLEAR RESTART FLAG SINCE HERE ON START 
;CLEAR CLK VECTOR PTR. AS A FLAG IN 


: NO CLOCK IS FOUND. 
;SETUP R2 AS A PTR. TO CLOCK INFO BLOCK 
V #°L,RO 


;LOOK FOR A LINE CLOCK 
MO 
TRAP 
MOV 

; IF NONE THERE GO LOOK ae & P=cLck 

; GO SET UP CLOCK INFO TABLE @ CLK VEC. 

SETUP THE ENABLE LINE CLOCK DATA 

;LOOK FOR A P=CLOCK SINCE NO LINE CLOCK 
MOV #'P,RO 
TRAP CSCLCK 
MOV RO,R1 

; If NONE THERE GO SEE A ae aS tas 

; ELSE GO SET UP CLOCK INFO & VECTOR 


———_ 


CVCLHA DPV-11 DATA COMM. LINK TEST 


CVCLHA.P11 


mrmnnn fj 


SSFRSSENSSSSESRESN SOF 


023170 


023246 
023250 
023256 
023262 
023270 


023272 


25-JUL-80 10:26 


062737 


000433 


104407 
103021 
greet 
005037 

012737 


104445 


010001 
103365 
011137 


000002 


000111 


000100 
006602 
006610 


013310 
000001 


000004 
006612 
006614 
007532 
177777 


006540 
006540 


006540 


006552 


006600 
163474 
006600 
006610 


006604 
006600 


006616 


006540 


002012 


dD 8 
MACY11 30A(1052) 25-JUL-80 10:29 PAGE 
INITIALIZE SECTION 


$3: 


$4: 


RESTRI: 


1$: 


NEW: 


GETPRM 


ADD #2,CLKCSR 
MOV #PCLKCT,@CLKCSR 
SUB #2, CLKCSR 


MOV #PCLKEN, CLKEN 
BR RESTR 

READBUS 

BNCOMPLETE $4 
MOV #100, CLKVEC 
CLR CLKBR 

MOV #CLKEN,CLKCSR 


GMANID 15060,CLKH2,D, 377,50. ,60. 


BR RESTRT 
PRINTF #BDCLK 


CLR TIMMIN 
CLR TIMSEC 
MOV CLKHZ,TIMTCK 
MOV #EVTLOG,R2 
MOV R2,EVIPTR 
MOV #-1,(R2)¢ 
CMP R2,#EVTEND 
BNE 1$ 
MOV #-1,LOGUNT 

: INC LOGUNT 
CMP LOGUNT .LSUNIT 
BGE NEW 


GPHARD LOGUNT,R1 


BNCOMPLETE GETPRM 


MOV (R1),FHDPLX 


95 
SES 9094 


POINT CLKCSR TO P=CLK COUNT SET REG. 
;LOAD CLK SET REG. WITH COUNT VALUE 
;POINT CLKCSR BAC TO P-CLK CSR 

;SETUP THE ENABLE THE P-CLK DATA 


;READ BUS TYPE TO SEE IF ON AN LSI 
T C$RDBU 
;BR IF NOT, NO CHANCE OF A CLOCK 
BCC De 


;LOAD 100 AS CLK VECTOR 
;LOAD 0 AS CLK INT. LEVEL 
;KLUDGE UP THE CSR & ENABLE DATA LOCS 


,YES 
TRAP C$GMAN 
ca 10000$ 
«WORD CLKHZ 
.WORD TSCODE 
-WORD 15060 


«WORD TSHILIM 
10000$: 


7 INFORM OPR. NO CLOCK, .. — INIT 
#BOCLK,=-(SP) 


MOV #) »= (SP) 
MOV SP.R 
TRAP CSPNTF 
ADD #4 ,SP 


CLEAR TIME SINCE START LOCATIONS 
;LOAD TICKS/SEC 
INIT EVENT TABLE TO ALL 1°S AFTER EACH 
; START OR RES AND INIT TABLE POINTER 


SEE IF REACHED END OF TABLE 
;LOOP UNTIL DONE 


INITIALIZE LOGICAL UNIT # 
POINT TO NEXT LOGICAL UNIT 

;SEE If PAST MAX. LOG. UNIT #@ 
;BR IF YES, AND START OVER 


GET THE P-TABLE FOR THIS LOG. UNIT 
MOV 


LOGUNT ,RO 
TRAP CSGPHRD 
MOV RO,R1 
;1F NO P-TABLE AVAIL., GO a NEXT ONE 
BCC GETPRM 


;PUT FULL OR HALF DUPLEX ANSWER IN LOC. 


| 
-WORD 377 | 
WORD TSLOLIM | 
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CVCLHA,P11 25-JsUL-80 10:26 INITIALIZE $ ON SEQ 0095 
41310 
eye DEVICE DEPENDENT PART OF GETTING INFO FROM P-TABLE 
AH 023310 016137 000002 011344 MOV 2(R1),RXCSR STORE AWAY CSR ADDRESSES 
4115 
4116 023316 016137 000002 011346 MOV 2(R1),PCSAR 
4117 023324 062737 000002 011346 ADD #2,PCSAR 
4118 023332 016137 000002 011350 MOV 2(R1),RDSR 
4119 023340 062737 000002 011350 ADD #2,RDSP 
4120 023346 016137 000002 011352 MOV 2(R1), TXCSR 
4121 023354 062737 000004 011352 ADD #4, TXCSR 
4122 023362 016137 000002 011354 MOV 2(R1),TDSR 
svar 023370 062737 000006 011354 ADD #6, TOSR 
4125 023376 016137 000004 011356 MOV 4(R1), INVEC STORE AWAY INPUT INTERRUPT VECTOR 
4126 02 016137 000004 411360 MOV 4(R1) ,OUTVEC 
4127 023412 962737 000004 911360 ADD #4 ,OUTVEC :BUILD OUTPUT INTERRUPT VECTOR 
4128 023420 016137 000006 0.1362 MOV 6(R1), INTPRI STORE AWAY INTERRUPT PRIORITY 
4129 023426 016137 000012 011364 MOV 12(R1) ,OPTYP STORE AWAY DEVICE OPTION TYPE 
4130 023434 016137 000014 011420 MOV 14(R1) , RNODE STORE AWAY THE REMOTE NODE TYPE 
4131 023442 ENDIT: 
4132 023442 SETVEC CLKVEC,@CLKINT #340 SETUP CLOCK VECTOR 
4133 023442 012746 000340 MOV #340,-(SP) 
4134 023446 012746 017042 MOV #CLKINT,<(SP) 
4135 023452 013746 006604 MOV CLKVEC ,-(SP) 
4136 023456 012746 000003 MOV #3,-(SP) 
4137 023462 104437 TRAP CS$SVEC | 
YS 023464 062706 000010 ADD #10,SP 
tee | DEVICE DEPENDENT VECTOR SETUP 
4142 023470 SETVEC INVEC,#DVRXI,#PRIO4 SETUP INPUT INTERRUPT VECTOR 
4143 023470 012746 000200 MOV #PRI04,-(SP) | 
4144 023474 012746 032472 MOV #DVRXI,-(SP) 
4145 023500 013746 011356 MOV INVEC ,-(SP) 
4146 023504 012746 000003 MOV #3,-(SP) 
4147 023510 104437 TRAP CS$SVEC 
4148 023512 062706 000010 ADD #10,SP 
4149 023516 SETVEC OUTVEC ,#DVTXL,#PRIO4 SETUP OUTPUT INTERRUPT VECTOR 
4150 023516 012746 000200 MOV #PRI04,-(SP) 
4151 023522 012746 033166 MOV #OVTIXI,-(SP) 
4152 023526 013746 011360 MOV OUTVEC ,-(SP) 
4153 023532 012746 000003 MOV #3,-(SP) 
4154 0235 104437 TRAP CSSVEC 
dt 54 023540 062706 000010 ADD #10.SP 
4157 023544 SETPRI #PRIOO :SET THE ‘'RUN'' PRIORITY TO 0 
4158 023544 012700 000000 MOV #PRIOO,RO 
4159 023550 104441 TRAP CS$SPRI 
4160 023552 EXIT INIT 
4161 023552 104432 TRAP CSEXIT 
4162 023554 000002 .WORD L10012-. 
4163 
4164 


4165 EVEN 
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CVCLHA.P11 25-JUL-80 10:26 INITIALIZE SECTION 


4106 

4167 023556 ENDINIT 
4168 023556 

4169 023556 104411 


L10012: 


TRAP 


CSINIT 


SEQ 0096 
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023560 
023560 


02356C 
023560 
023560 104461 


AUTODROP SECTION 
-SBTTL AUTODROP SECTION 


5: ** 

; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
; THE "ADR" FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
; SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 

; DROPPED FROM TESTING. 


BGNAUTO 
L$AUTO:: 


ENDAUTO 
L10013: 
TRAP C$AUTO 


SEQ 0097 
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416 -SBTTL CLEANUP CODING SECTION 


4188 jee 

4189 ; THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
ater ; AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 

p ie 


4193 023562 BGNCLN 
4194 023562 LSCLEAN:: 


4196 023562 005077 163012 CLR Q@cLKCSR ;DISABLE CLOLK 

4197 023566 SETPRI] #PRIO7 :SET PROCESSOR PRIORITY BACK TO 7 

4198 023566 012700 000340 MOV #PRIO7,RO 
4199 023572 104441 TRAP C$SPRI 
4200 023574 BRESET ;CLEAR ALL BEFORE END 

4201 023574 104433 TRAP CSRESET 


4203 023576 EXIT CLN 
4204 023576 104432 TRAP C$ 
4205 023600 000002 -WORD 11 


4208 EVEN 
4210 023602 ENDCLN 


4211 023602 L10014: 
4212 023602 104412 1 RAP CSCLEAN 
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4213 .SBTTL DROP UNIT SECTION 

4214 

4215 see 

4216 ; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 

4217 ; TO NO LONGER BE TESTED. 

4218 ;-- 

4219 

4220 023604 BGNDYU 

4221 023604 L$DU:: 

4222 

4223 

4224 023604 EXIT DU 

4225 023604 000167 -WORD J$JMP 
4226 023606 000000 ~WORD 110015-2-. 
4227 

4228 

4229 ~EVEN 

4230 

4231 023610 ENDDU 

4232 023610 L10015: 


023610 104453 TRAP C$DU 
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234 -SBTTL ADD UNIT SECTION 


4236 100 
; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
4238 : TO BE EXECUTED IN CONJUNCTION WITH THE ADDI“c OF A UNIT BACK 
; TO THE TEST CYCLE. 


612 BGNAU 
4243 023612 LSAU:: 


4246 023612 EXIT AU 
4247 023612 000167 -WORD JSJMP 
4248 023614 000000 «WORD 110016-2-. 


4251 -EVEN 
4253 023616 ENDAU 


4254 023616 10016: 
4255 023616 104452 TRAP C$AU 
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023620 
023620 


023620 


023722 
023726 


013777 


005001 


005737 
001112 


005037 
0 


006610 


000001 
006620 


013334 
000001 


000004 
006544 


006512 


é4 
021202 
000001 


162752 


006620 


006426 


006500 
006502 
006450 
0064 34 


006510 
006506 


006444 


MACY11 30A(1052) 


TEST 1 
~SBTTL 


- ++ 


TEST 1: 
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SETUP AND MODES OF OPERATION 


SETUP AND MODES OF OPERATION 


: TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK. THIS TEST WILL 
; THE PROVIDE COVERAGE NECESSARY TO ISOLATE FAILURES TO THE COMPUTER 


; EQUIPMENT, 


-SBTTL 


GTXRXB: 


GTRA2: 
1$: 


GTRA3: 


GTRAG: 


BGNTST 


E 
PRINTF 


THE COMMUNICATION LINK, OR THE MODEM. 


Tl:: 


PROGRAM SETUP SECTION 
;ENABLE THE CLOCK 


CLKEN,@CLKCSR 


R1 
#1,TIMER1 
TIMER1 
GTRAS 

R1 


1$ 
#NOCLK 


RESFLG 
GTRAS 


TOTCC 
TTOTCC 
CTOTCC 
#PTRTAB,R1 
R1,1XPTR 
RXPTR 


#PTRI3,CMPPTR 


#5 ,MASGTYP 
MSG5C ,,CURCC 
#TXBUF , TCURAD 
#@CMPBUF ,CCURAD 


TCURAD , CURADD 
TXPTR,CPIR 

PC ,BLOBUF 

#1, TXmMTOT 


;SET TIMER TO COUNT i TICK 
;CHECK FOR IT TO BE COUNTED OFF 
;BRANCH IF CLOCK EXISTS (COUNTED A TICK) 


KEEP CHECKING UNTIL R1 DOES FULL COUNTDWN 
;PRINT BAD CLK MSG AND WARN OF —~ IF TIMEOUT 


SEQ 0101 


#NOCLK, <a 


MOV #1,-(SP 
MOV SP.RO 
TRAP CSPNTF 
ADD #4 ,SP 


;SEE IF HERE AFTER A RESTART. 
;BR IF HERE CAUSE OF A RESTART 


COUNTS AND SET UP DEFAULTS 
;CLEAR TOTAL CHAR. COUNT TEMP. LOC. 


; CLEAR TOTAL CHAR. COUNT FOR TX BUFF 


; CLEAR TOTAL CHAR. COUNT FOR CMP BUFF 


:INIT TRANSMIT MESSAGE POINTER 


; ZERO RX POINTER 


; INIT COMPARE MESSAGE POINTER 


;SET UP DEFAULT MSG TYPE (QUICK FOX = ITEP MSG) 
;SET UP DEFAULT CHAR COUNT 
;SET UP CURRENT ADD TO START OF TX BUFFER 


:SET UP CURRENT ADD TO START OF CMP BUFFER 





;SETUP CURRENT ADDR TO START OF TXBUF 

; SETUP CURRENT POINTER TABLE POINTER FOR TXBUF 
GO BUILD POINTER TABLE AND BUFFER 

“BUMP TOTAL MESSAGE COUNT 







































066 
4324 024074 
4326 024102 


4336 024152 
4338 024156 


8 OH OH os 
MM UIP FAO 
NNO NNN NGS 
AWWAWAIAAAAAIOw 
SSNS 


104450 
103412 
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0064 


000002 


012014 
000001 


000004 


021326 


006556 


000001 
027054 


TEST 


006430 
006546 


006556 
006554 


007662 
007664 
007666 
007670 


006550 


MACY11 30A(1052) 


GTRAS: 


1$: 


~SBTTL 
GETCL: 
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PROGRAM SETUP SECTION SEQ 0102 
MOV CMPPTR,CPIR 7SET UP START OF COMPARE POINTER TABLE 
MOV CCURAD, _— ;SET UP CURRENT ADDR. TO START OF CMPBUF 
MOV a5, MSGTYP 
MOV MSGSC, CURCC 
JSR PC, BLOBUF ;PUT DEFAULT MESSAGE dd CMPBUF 
MOV #1,CMPTOT ‘BUM P THE COMP MESG COUN 
MOV #ACT, MODTYP ;SET DEFAULT MODE= ACTIV VE 
CLR MLTYP SET DEFAULT MAINTENANCE LOOP MODE =NONE 
MOV #1,RPASS :SET UP DEFAULT ‘‘RUN PASS'’ COUNT TO 1 
MOV #2,PARAM SET UP PROG. PARAMETERS = DATACHECKING ENABLED 
; OPERATOR STATUS MSGS. PRINT OFF 
PRINTF #HLPO 
MOV #HLPO, al 
MOV #i, -(§P 
MOV SP,RO 
TRAP CSPNTF 
ADD #4,SP 
MOV MODTYP,DEV1 
MOV MLTYP,DEV2 
MOV RPASS ,DEV3 
MOV PARAM,DEV4 
JSR PC, SHWOP sPRINT TO OPERATOR THE CURRENT MODE...... 
MANUAL sSEE IF MANUAL INTERVENTION ALLOWED 
TRAP CSMANI 
BCOMPLETE GETCL ; BR IF YES (UAM=0 AND NOT CHAINED) 
BCS GETCL 
TST RPASS ;SEE IF THIS IS FIRST ‘‘DCLT PASS" 
BNE 1$ ; BR IF NOT COMPLETED 1 PASS 
EXIT TST ; IF DONE 1 PASS IN UNATTENDED MODE - EXIT 
TRAP CSEXIT 
«WORD L10017 
MOV #TTL,MLTYP SET UP DEFAULT FOR UNATTENDED MODE 
JMP GTRIO : ‘'R M=ACT/LO=1/PAS=1/NOST/CH'' AND RUN 
COMMAND LINE FETCH & INTERPRETATION SECTION 
CLRB P$GDBD ;CLEAR CMD LINE PARSING ERROR FLAGS 
CLRB PSNNUF 
GMANID CLISPM,CMDBUF,A,0,1,72.,NO ;GET A COMMAND gi! P ae OPR. 
CSGMAN 
10000$ 
WORD CMDBUF 
WORD TSCODE 
WORD CLISPM 
WORD 0 
. WORD TSLOLIM 
«WORD TSHILIM 
10000$: 
MOV #CMOBUF ,PSBUFA 
MOV #CLITRE,PSTREE 
MOV #CLIACT,PSACT 
CLR QUALFG ;CLEAR QUALIFIER FLAG LOCATION 
JSR PC, PSTRV ‘60 PARSE COMMAND 


LINE 
P$GDBD ;SEE IF PARSED OK OR AN ERROR 
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CVCLHA.P11 25-JUL-80 10:26 COMMAND LINE FETCH & INTERPRETATION SECTION SEQ 0103 


43/0 024274 001412 BEQ 1$ 

4371 024276 PRINTF #CLIERM 

4372 024276 012746 011474 MOV #CLIERM,-(SP) 

4373 024302 012746 000001 MOV #1,-(SP) 

4374 024306 010600 MOV SP ,RO 

4375 024310 104417 TRAP CSPNTF 

4376 024312 062706 000004 ADD #4 ,SP 

4377 024316 000137 024206 JMP GETCL 

4378 024322 105737 003130 1$: TSTB PS$NNUF ;SEE If INCOMPLETE COMMAND TYPED 

4379 024326 001412 BEQ 10% 

4380 024330 PRINTF #CLINUF 

4381 024330 012746 011524 MOV #CLINUF ,-(SP) 

4382 024334 012746 000001 MOV #1,-(SP) 

4383 024340 010600 MOV SP,RO 

4384 024342 104417 TRAP CSPNTF 

4385 024344 062706 000004 ADD #4,SP 

rt 024350 000137 024206 JMP GETCL 

4388 024354 023727 003010 000005 108: CMP KEYWD1,#HLP :SEE IF HELP WAS TYPED 

4389 024362 001711 BEQ GETCL :GO GET CMD AGAIN IF YES 

4390 024364 023727 003010 000055 CMP KEYWO1,#PRNT SEE IF PRINT WAS TYPED 

4391 024372 001705 BEQ GETCL ; GO GET CMD AGAIN IF YES 

4392 024374 023727 003010 000004 CMP KEYWD1,#RUN SEE IF RUN WAS TYPED 

4393 024402 00100 BNE 11$ ; BR IF NO 

4394 024404 000137 027054 JMP GTRO ; START EXEC. IF YES 

4395 024410 023727 003010 000052 11$: CMP KEYWD1,#OMPS ;SEE 1F DUMP WAS TYPED 

4396 024416 0010 BNE 12% ; BR IF NO 

4397 024420 004737 020746 JSR PC ,DUMPSR ; ELSE, DUMP PART OF MEMORY 

4398 024424 000137 024206 JMP GETCL : THEN RETURN TO GET ANOTHER CMD. 

4399 024430 023727 003010 000001 12$: CMP KEYWD1,#CLEAR SEE IF CLEAR WAS TYPED 

4400 024436 001663 BEQ GETCL : IF YES, BACK TO GET ANOTHER CMD. 

4401 024440 023727 003010 000002 CMP re #SHOW ;SEE IF SHOW WAS TYPED 

4402 024446 001657 BEQ GETCL ; IF YES, BACK TO GET ANOTHER CMD. 

4403 024450 023727 003010 000010 4$: CMP KEYWD1,#SETEXP SEE IF SET EXPECTED 

4404 024456 001512 BEG 23 ; BR IF YES (A SETEXP WAS TYPED) 

4405 024460 013737 006446 006512 5$: MOV TTOTCC, TOTCC 

4406 024466 023727 006512 001000 CMP TOTCC, #BUFLIM SEE If BUFFER ALREADY FULL 

4407 026474 002414 BLT 15$ ; BR IF NOT FULL (BUFLIM # OF CHARS.) 

4408 024476 PRINTF #MSGTRN, #BUFEX : ELSE TELL OPR. AND DON'T BUILD MSG. 

4409 024476 012746 013455 MOV #BUFEX,-(SP) 

4410 0246502 012746 013473 MOV #MSGTRN,-(SP) 

4411 024506 012746 000002 MOV #2,-(SP) 

4412 024512 010600 MOV SP,RO 

4413 024514 104417 TRAP CSPNTF 

4414 024516 062706 000006 ADD #6,SP 

4415 024522 000137 024206 JMP GETCL : THEN GO GET A NEW COMMAND 

4416 024526 005737 006446 15$: TST TTOTCC SIF FIRST *f SET'' THEN GET RID OF DEFAULT 

4417 024532 001002 BNE 6$ 

4418 024534 005037 006444 CLR TXMTOT 

4419 024540 te 006132 006424 6$: MOV #PTRTAB, TXPTR :GET POSITION OF END OF TX LIST 

4420 024546 013701 MOV TXMTOT, 

4421 024552 020127 CMP R1,@MSGLIM :SEE IF MSG COUNT EXCEEDED. 

46422 024556 002414 BLT 17 : BR IF N 

4423 024560 PRINTF @#MSGTRN, #TABEX ; ELSE TELL OPR. AND DON'T BUILD MSG 
012746 MOV #TABEX,-(SP) 
012746 MOV #MSGTRN,-(SP) 
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COMMAND LINE FETCH & 


17$: 


2$: 


16$: 


7$: 


18$: 


6 
PRINTF 


PRINTF 


25-JUL-80 


GETCL 
R| 


R1 

R1,TXPTR 
TXPTR,CPTR 
TCURAD , CURADD 
P CC 


CURADD, TCURAD 
TXMTOT 

QUALVL 

5$ 

GETCL 


cTOTCC, TOTCC 
+ Ne maa 


6 
#MSGTRN, #BUFEX 


GETCL 
CTOTCC 
7$ 


CMPTOT 
#PTRI3,CMPPTR 
CMPTOT, 

1 eas 


8$ 
#ASGTRN, #TABEX 


GETCL 
R1 


R1 

R1,CMPPTR 
CMPPTR,CPTR 
CCURAD , CURADD 
PC ,ADDCC 

PC ,BLOBUF 
CPTR,CMPPTR 
CMPTOT 


8 
10: P 
INTERPRE 


29 


AGE 105 
TATION SECTION 


MOV oe -(SP) 
MOV P,RO 
TRAP CSPNTF 
aan #6,SP 


; THEN GO GET A NEW COMMAN 
34 OF MSGS *4 = NEXT FREE PIR BLOCK 


;SETUP CHAR. COUNT, CURRENT ADDR, & PTR 


;ADD IN CHAR. COUNT AND CHECK TOTAL 
:GO BUILD MESSAGE IN BUFFER AND PTRS. 


;UPDATE CHAR. COUNT, 


;DEC THE COPY COUNT 


CURR ADDR, & PTR 


SETUP CHAR. COUNT, CURR. ADDR. & PTR 
i SEE IF BUFFER ALREADY FULL 

; BR IF NOT FULL (BUFLIM # OF CHARS.) 

: ELSE TELL OPR. AND DON'T BUILD MSG. 

MOV #BUFEX ,-(SP) 


NEW 


MOV 

MOV #2,-(SP) 

MOV SP ,RO 

TRAP CSPNTF 

ADD #6,SP 
COMMAND 


;INiT COMPARE MESSAGE POINTER 
oR i “> COUNT EXCEEDED. 
; ELSE TELL ORR. AND DON'T BUILD MSG. 


; THEN GO GE 
7# OF MSGS * 


T 
& 


A 


NEW 
NE X 


" THEN GET RID OF DEFAULT 


SEQ 0104 


#MSGTRN, - (SP) 


MOV #TABEX,=-(SP) 
MOV #MSGTRN, (SP) 
MOV #2,-(SP) 
MOV SP RO 
TRAP CSPNT 
ADD #6,SP 
COMMAND . 
T FREE PTR BLOCK 


ADD IN XHAR, COUNT AND CHECK TOTAL 
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PAGE 106 
CVCLHA.P11 —-25=JUL-80 10:26 COMMAND LINE FETCH & INTERPRETATION SECTION 
4482 025102 01 et 006510 006434 MOV CURADD , CCURAD ;UPDATE CHAR. COUNT, CURR ADDRR. & PTR 
4483 025110 013737 006512 006432 mov —‘- TOTCC, CToTcc 
4484 025116 005337 003014 DEC QUALVL ;1F COPY WAS GIVEN, PUT MSG IN BUFF 
4485 025122 001270 BNE 28 : AGAIN | 
L486 025124 000137 024206 IMP GETCL 'G0 BACK UNTIL GET A ‘RUN’ 
4488 
4489 
4490 


SEQ 0105 
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CVCLHA.P11 25-JUL-80 10:26 COMMAND LINE FETCH & INTERPRETATION SECTION SEQ 0106 

4492 

4493 .SBTTL ACTION TABLE AND ROUTINES 
4494 ; USER MUST CLEAR/SET P$GDBD IF USE ‘'CLIBIF’' IN CONNECTION WITH ACTION 
4495 ‘ R2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE 
4496 025130 CLIACT: 
4497 025130 0046302 ASL R2 
4498 025132 016202 025146 MOV 10$(R2),R2 sFORM ADDRESS OF ACTION ROUTINE 
4499 025136 062702 025146 ADD #10$,R2 
4500 025142 004712 JSR PC, (R2) 
t+ 025144 000207 RTS PC 
4503 025146 000144 198: «WORD ACTNUL-10$ 
4504 025150 000146 -WORD ACTCLR-10$ 
4505 025152 000156 -WORD ACTSHO-10$ 
4506 025154 001476 «WORD ACTCHK-10$ 
4507 025156 000246 -WORD ACTRUN-10$ 
4508 025160 000166 «WORD ACTHLP-10$ 
4509 025162 000272 -WORD ACTCSE-10$ 
4510 025164 000364 «WORD ACTCST-10$ 
4511 025166 000706 «WORD ACTSTE-108 
4512 025170 000716 WORD ACTSTT-10$ 
4513 025172 000734 ~WORD ACTSZ7-10$ 
4514 025174 000744 «WORD ACTCOP-10$ 
4515 025176 000754 WORD ACTNUM-10$ 
4516 025200 001046 -WORD ACTOPM-10$ 
4517 025202 001504 «WORD ACTSTS-10$ 
4518 025204 001066 -WORD ACTEQO-10$ 
4519 652608 001146 -WORD ACTMSO-10$ 
4520 025210 001154 «WORD ACTMS1-10$ 
4521 025212 001164 -WORD ACTMS2-108 
4522 025214 001174 -WORD ACTMS3-10$ 
4523 025216 001204 -WORD ACTMS4-10$ 
4524 025220 001214 «WORD ACTMS5-10$ 
4525 025222 001232 -WORD ACTMS6-10$ 
4526 025224 001262 -WORD ACTATV-10$ 
4527 025226 001272 «WORD ACTPAS-10$ 
4528 025230 001312 -WORD ACTREC-10$ 
4529 025232 001320 -WORD ACTLIS-10$ 
4 025234 001330 -WORD ACTOLL-10¢ 
4531 025236 001340 -WORD ACTTRA-10$ 
4532 025240 001350 WORD ACTTAL-10$ 
4533 025242 001376 WORD ACTNO-10$ 

5 025244 001406 -WORD ACTECH-10$ 
4535 025246 001512 «WORD ACTCRC-108 
4536 025250 001526 «WORD ACTPRO-108$ 
4537 025252 001560 «WORD ACTRPS-108 
4538 025254 001570 -WORD ACTMOP-10$ 
4539 025256 001600 -WORD ACTILP-10$ 
4540 0252 001610 -WORD ACTCLP-108 
4541 025262 001620 «WORD ACTLLP-108 
4542 025264 001630 -WORD ACTRLP-108 
4543 025266 000136 -WORD ACTNUF-10$ 
4544 025270 001124 «WORD ACTBCR-10$ 

4545 025272 42 .WORD ACTOMS-10$ 
4546 025274 000672 .WORD ACTOME-10$ 

4547 025276 64 -WORD ACTOMQ-10$% 
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CVCLHA,P11 25-JUL-80 10:26 ACTION TABLE AND ROUTINES 


4548 025300 000232 WORD ACTPRT=10$ 
teen 025302 001520 -WORD ACTMOS-10$ 


SEQ 0107 


——-- 
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000002 


003016 


012072 
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177777 


000001 


006226 
006426 


006430 
003130 


006132 


003130 


003010 


003010 


003010 


003010 


003010 
003130 
006556 


006426 


000002 
0064 30 


006426 
006506 


000002 
006444 
006424 


MACY11 eet og 


ACTNUF : 
ACTNUL: 


ACTCLR: 
ACTSHO: 


ACTHLP: 
16; 


ACTPRT: 


ACTRUN: 


ACTCSE: 


ACTCST: 


MOVB 
RTS 


MOV 
RTS 


MOV 
RTS 


MOV 
PRINTF 


E 
25-JUL -80 


#-1 , PSNNUF 
PC 


#CLEAR KE YWO! 
Pc 


#SHOw, KE YwD! 
PC 


#HLPTAB,R2 
MHLPF,(R2)¢ 


a 
MHLP KEYWD1 
PC 


#PRNT,KEYWD1 
PC REPORT 
PC 


#RUN KE YWD1 
#-1 , PSNNUF 
#1 ,RPASS 

PC 


#PTR13,CMPPTR 
CMPPTR,R1 


CMPTOT,R2 
PSNNUF 
KEYWO1,#SHOW 
ACTSHW 

#1, CMPTOT 
CTOTCC 


#PTRIS,CMPPTR 
CMPPTR,CPIR 
#CMPBUF ,R1 
R1,CCURAD 
ACTCLB 


#PTRTAB,R1 
TXMTOT,R2 
PSNNUF 
KEYWD1 , @SHOW 
ACTSHW 

#1, TXMTOT 
TTOTCC 
@PTRIAB,TXPTR 


9 
10:29 PAGE 109 
TION TABLE AND ROUTINES 


:SET FLAG TO SAY NEED MORE OF COMMAND 


RETURN TO PARSER 


;SET LOC TO SAY A CLEAR WAS T 


:SET LOC. 


TO SAY A SHOW WAS T 


YPED 


YPED 


;SETUP R2 AS A POINTER TO HELP MSG TABLE 
PRINT HELP INFORMATION MESSAGES 


;SEE IF ALL INFO PRINTED YET 
71F NO KEEP PRINTING 


;SET LOC. 


TO SAY A HELP WAS T 


;SET LOC. TO SAY A HELP WAS T 


YPED 


YPE 


(R2)+,-(SP) 


D 
;CALL ROUTINE TO PRINT EVENT LOG AND BASE TABLE 


N FLAG 


:SET RU 
SET FLAG TO SAY NEED va ” COMMAND 
SET DE 10 1 


FAULT RUN ‘'PASS"' 


INIT COMPARE MESSAGE POINTER 


FLAG THAT HAVE VALID yoy AT THIS PT. 


;SEE IF A CLEAR OR SHOW WAS 
:BR IF A SHOW WAS TYPED 
CLEAR COMPARE MESSAGE COUNT, 


: AND RESET POINTER 


INIT COMPARE MESSAGE POINTER 
;SET UP TO FILL IN DEFAULT ME 


TYPED 
CHAR. 


SSAGE 


COUNT 


:FLAG THAT HAVE VALID COMMAND AT THIS PT. 
;SEE IF A CLEAR OR SHOW WAS | 
7BR IF A SHOW WAS TYPED 


;CLEAR TRANSMIT MESSAGE COUNT, 
; AND RESET POINTER 


Yr cD 
CHAR. 


COUNT 


SEQ 0108 
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CVCLHA.P11 25-JUL-80 10:26 ACTION TABLE AND ROUTINES SEQ 0109 
4607 025576 013737 006424 006506 MOV TXPTR,CPTR 
4608 025604 012701 003132 MOV #TXBUF ,R1 
rr ¢ 24 025610 010137 006450 MOV R1, TCURAD 
4611 025614 012702 001000 ACTCLB: MOV #BUFLIM,R2 
4612 025620 010137 006510 MOV R1, CURADD ;SET UP TO PUT DEFAULT MSG IN LIST AFTER 033°S 
4613 025624 012737 000005 006500 MOV #5.MSGTYP 
4614 025632 013737 002162 006502 MOV MSGSC, CURCC 
4615 025640 105021 1$: CLRB (R1 sFILL EXPT OR TRAN BUFFER WITH O'S IF A CLEAR 
4616 025642 005302 DEC R2 :D0 ‘BUFLIM’' NUMBER OF BYTE LOCATIONS 
4617 025644 001375 BNE 1$ 
4618 025646 004737 021202 JSR PC ,BLDBUF :"'CLEAR'’ REALLY MEANS TO PUT DEFAULT MSG IN 
rr th 025652 000207 RTS PC sWHEN DONE, RETURN TO PARSER 
4621 
4622 025654 012705 003054 ACTSHW: MOV #SHTAB,RS 
4623 025660 122571 000000 S$: CMPB (R5)+,a(R1) sLOOK AT FIRST BYTE OF MSG TO DECIPHER TYPE 
4624 025664 001404 BEQ 6$ 
4625 025666 020527 003063 CMP RS, #SHTEND SEE IF LOOKED AT ALL OF DEFAULTS YET 
4626 025672 001372 BNE 5$ 
4627 025674 005205 INC R5 >MUST BE OPR. SPEC'D THEN 
4628 025676 162705 003055 6$: SuB #SHTAB+1, RS 
4629 025702 006305 ASL R5 
4630 025704 016137 000002 006516 MOV 2(R1), TEMP 
4631 025712 PRINTF #SHMSG,SHTYTB(R5),TEMP ;PRINT MSG SIZE & TYPE 
4632 025712 013746 006516 MOV TEMP, -(SP) 
4633 025716 016546 003034 MOV SHTYTB(RS) ,-(SP) 
4634 025722 012746 012631 MOV #SHMSG,-(SP) 
4635 025726 012746 000003 MOV #3,-(SP) 
4636 025732 010600 MOV SP RO 
4637 025734 104417 TRAP CSPNTF 
4638 025736 062706 000010 ADD #10,SP 
4639 025742 062701 000004 ADD #4,R) :BUMP R1 TO NEXT SET OF POINTERS 
4640 025746 005302 DEC R2 
4641 025750 001341 BNE ACTSHW 
4642 025752 013737 006546 007662 MOV MODTYP,DEV1 
4643 025760 013737 006550 007664 MOV MLTYP,DEV2 
4644 025766 013737 006556 007666 MOV RPASS ,DEV3 
4645 025774 013737 006554 007670 MOV PARAM, DEV4 
4646 026002 004737 021326 JSR PC, SHWOP :SHOW THE OPERATOR THE CURRENT MODE..... ALSO 
rr ot 026006 000207 RTS PC 
4649 026010 013737 003124 006472 ACTDMS: MOV PSNUM,STADD :SETUP STARTING ADDRESS FOR DUMP 
4650 026016 005037 006476 CLR BYTBIT :SET DEFAULT OF WORD DUMP 
4651 026022 012737 000052 003010 MOV #DMPS ,KEYWD1 FLAG THAT A DUMP WAS TYPED 
prt | 026030 000403 BR ACTDME 
4654 026032 012737 177777 006476 ACTDMQ: MOV #-1,BYTBIT :SET DUMP FLAG TO ‘‘DUMP-WORD'' 
4655 026040 013737 003124 006474 ACTDME: MOV PSNUM,ENADD ;SETUP END ADDRESS FOR DUMP (=START IF NO “EEE” 
4656 026046 105037 003130 ACTDMX: CLRB PSNNUF :CLEAR NOT-ENOUGH FLAG, ‘DUMP N-N/B"' 15 VALID 
4657 026052 000207 RTS PC 
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CVCLHA.P11 25-JUL-80 10:26 ACTION TABLE AND ROUTINES »EQ 0110 
4659 
4660 
4661 026054 012737 000010 0C3010 ACTSTE: MOV @SETEXP,KEYWD1 
rr | 026062 000403 ae ACTSTX 
4664 026064 012737 000011 003010 ACTSTT: MOV #SETTRN,KEYWD1 
4665 026072 012737 000001 003014 ACTSTX: MOV #1 ,QUALVL SET UP DEFAULT COPY TO 1 (/COPY=0) 
mr] 026100 000207 RTS PC 
4668 026102 012737 000012 003012 ACTSZE: MOV #SIZE,QUALFG 
rg 026110 000207 RTS PC 
4671 026112 012737 000013 003012 ACTCOP: MOV #QCOPY ,QUALFG 
pro 026120 000207 RTS PC 
4674 026122 023727 003012 000012 ACTNUM: CMP QUALFG,#SIZE ;SEE if A SIZE OR COPY TYPED 
4675 026130 001023 BNE 1$ “BR IF IT WAS A COPY 
4676 026132 005737 003124 TST PS$NUM :CHECK TO BE SURE DIDN'T TRY SIZE=0 
4677 026136 001014 BNE 3$ ; BR IF NO 
4678 026140 PRINTF #CLISEO 
4679 026140 012746 011763 MOV #CLISEO,-(SP) 
4680 026144 012746 000001 MOV #1,-(SP) 
4681 026150 010600 MOV P,RO 
4682 026152 104417 TRAP CSPNTF 
4683 026154 062706 000004 ADD aa,sP 
4684 026160 112737 177777 603131 MOVB #-1,P$GDBD 7SEE ERROR-IN-CMD FLAG 
4685 026166 000411 Ke 23 
4686 026170 013737 003124 006502 38: MOV PSNUM, CURCC s1F A SIZE LOAD CURCC WITH BYTE COUNT 
4687 026176 000405 ae 23 
4688 026200 013737 003124 003014 18: MOV PSNUM, QUAL VL If A COPY, LOAD COPY COUNT 
4689 026206 005237 003014 INC QUAL VL : INCREMENT SO FIRST DEC MAKES IT REAL @ 
re A 026212 000503 23: ay] AC TME X 
4692 026214 012737 000007 006500 ACTOPM: MOV a7, MSGTYP 
4693 026222 010437 006516 MOV R4,TEMP KEEP TRACK OF START OF QUOTED TEXT 
4694 026226 005237 006516 INC TEMP ; SO CAN CALC OPCNT AT END OF QUOTES 
reat 026232 000207 RTS PC 
4697 026234 010402 ACTEQO: MOV R4,R2 
4698 026236 163702 006516 SUB TEMP ,R2 
4699 026242 010237 006502 MOV R2,CURCC CALC BYTE COUNT FOR QUOTED TEXT 
4700 026246 010237 002166 MOV R2,O0PCNT 
4701 026252 013701 006516 MOV TEMP,R1 
4702 026256 012705 002520 MOV #OPBUF .R5 
4703 026262 112125 1$: MOVB (R1)+,(R5)¢ ;COPY QUOTED TEXT TO OPBUF 
4704 026264 005302 DEC R2 
4705 026266 001375 BNE 1$ 
rhs 026270 000454 Khe ACTME X 
4708 026272 ACTBCR: PRINTF #CLIBCR :BAD CHAR. IN OPR. QUOTED STRING 
4709 026272 012746 011716 MOV @CLIBER,-(SP) 
4710 026276 012746 000001 MOV #1 ,-(SP) 
4711 026302 010600 MOV SP RO 
4712 026304 104417 TRAP CSPNIF 
4713 026306 062706 000004 ADD a4 ,SP 
4714 026312 000207 RTS PC 


eas eS 
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25-JUL-80 10:26 


CVCLHA,P11 


4730 026406 


4732 026414 
4733 026422 
4734 026426 


005037 


006500 
000001 
000002 
000003 
000004 


000005 
002162 


000006 
002164 


000100 
003130 


006500 
006500 
006500 
006500 


006500 
006502 


006500 
006502 


006502 


H 9 
MACY11 30A(1052) 25-JUL-80 10:29 PAGE 112 
ACTION TABLE AND ROUTINES 


ACTMSO: CLR MSGTYP 
BR ACTME1 
ACTMS1: MOV #1 ,MSGTYP 
BR ACTME( 
ACTMS2: MOV #2,MSGTYP 
BR ACTME1 
ACTMS3: MOV #3 ,MSGTYP 
BR ACTME1 
ACTMS4: MOV #4 ,MSGTYP 
BR ACTME1 
FCTMSS: MOV #5 ,MSGTYP 
MOV MSG5C,CURCC ;SETUP DEFAULT SIZE FOR THIS TYPE 
BR ACTMEX 
ACTMS6: MOV #6 ,MSGTYP 
MOV MSG6C ,CURCC SETUP DEFAULT SIZE FOR THIS TYPE 
ACTME1: MOV #64. ,CURCC sSETUP DEFAULT SIZE FOR MSGO0-4 
ACTMEX: a 4 ae! ;CLEAR NCT-ENOUGH FLAG 


SEQ 0111 







1 9 
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CVCLHA.P11 257JUL-80 10:26 ACTION TABLE AND ROUTINES SEQ C112 


4736 026430 012737 000003 006546 ACTATV: MOV #ACT MODTYP 


ee 026436 000432 BR acTmAy 

4739 026440 012737 000002 006546 ACTPAS: MOV #PAS ,MODTYP 

4740 026446 105037 003130 (LRB PSNNUF ; CLEAR NOT-ENOUGH FLAG 
4741 026452 005037 006550 CLR MLTYP ;CLEAR MAINT LOOP TYPE 
athe 026456 006207 RTS PC 

4744 026460 005037 006546 ACTREC: CLR MODTYP 

745 026464 000417 BR ACTM2Xx 

4747 026466 012737 000006 006546 FTLIS: MOV #LIS,MODTYP 

4748 026474 000413 BR ACTMOX 

4750 026476 012737 000004 006546 ACTDLL: MOV #D0W,MODTYP 

4731 026504 000407 BR ACTMOX 

4753 026506 012737 000001 006546 ACTIRA: MOV #TRA,MODTYP 

4754 026514 000403 BR AC TMX 

4796 026516 012737 000005 006546 ACTTAL: MOV #TAL,MODTYP 

4758 026524 042737 000004 006554 ACIM2x: BIC #ECHOB,PARAM ;DISABLE /ECHO (ALL BUT PASSIVE MODE) 
4759 026532 105037 003130 CLRB PSNNUF ;CLEAR NOT-ENOUGH FLAG 
4760 026536 005037 006550 CLR MLTYP sCLEAR MAINT LOOP TYPE 
4761 026542 000207 RTS PC 
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CVCLHA.P11 25-JUL-80 10:26 ACTION TABLE AND ROUTINES SEQ 0113 
4763 026544 012737 000036 003012 ACTNO: MOV #NO,QUALFG 
oiee 026552 000207 RTS PC 
4766 026554 022737 000036 003012 ACTECH: CMP #NO,QUALFG 
4767 026562 001422 REQ 1$ 
4768 9026564 052737 000004 006554 BIS #ECHOB, PARAM 
4769 026572 022737 000002 006546 CMP #PAS,MODTYP ;BE SURE IN PASSIVE MODE IF 
4770 026600 001416 BEQ 23 IF TRYING TO SET /ECHO 
4771 026602 PRINTF #CLINPS 
4772 026602 012746 011653 MOV #CLINPS,-(SP) 
4773 026606 012746 000001 MOV #1,-(SP) 
4774 026612 010400 MOV SP,RO 
4775 026614 104417 TRAP CSPNTF 
4776 026616 062706 000004 ADD #4,S5P 
4777 026622 112737 177777 00313) MOVB #-1,P$GDBD 
4778 026630 042737 000004 006554 1$: BIC #ECHOB, PARAM 
4779 026636 005037 003012 23: CLR QUALFG sCLEAR ‘'NO'’ OUT OF QUALIFIER FLAG 
re 026642 000501 HR ACTLXX 
4782 026644 012701 000002 ACTCHK: MOV #DATCKB,R1 SET DATA CHECK BIT 
tS 026650 000413 RR ACTQFG 
4785 026652 012701 000001 ACTSTS: MOV #STATB,R1 SET THE STATUS BIT 
re 026656 000419 BR ACTQFG 
4788 026660 012701 000020 ACTCRC: MOV #CRCB,RI1 ;SET THE CRC BiT 
re 44 026664 000405 BR ACTQFG 
4791 026666 012701 000010 ACTMOS: MOV #MOCHK ,R1 :SET THE MODEM BIT 
8s 026672 000402 BR ACTQFG 
the 026674 012701 000040 ACTPRG: MOV #PROTOB,R1 SET THE PROTOCOL BIT 
4796 026700 050137 006554 ACTOFG: BIS R1,PARAM 
4797 026704 022737 000036 003012 CMP #NO0 ,QUALFG 
4798 026712 001002 BNE 1$ 
4799 026714 040137 006554 BIC R1,PARAM 
4800 026720 005037 003012 1$: CLR QUALFG :CLEAR "'NO'’ OUT OF QUALIFIER FLAG 
rr od 026724 000450 BR ACTLXX 
4803 026726 013737 003124 006556 ACTRPS: MOV PSNUM,RPASS :GET NUMBER OF ‘'RUN PASSES'' 
Pe 026734 000444 uM ACTLXX 
4806 026736 012737 000005 006550 ACTMOP: MOV #S,MLTYP 
4807 026744 000417 Kk ACTLPX 
4808 026746 012737 000001 006550 ACTILP: MOV #i,MLTYP 
4809 026754 000413 bn ACTLPX 
4810 026756 012737 000002 006550 ACTCLP: MOV #2,MLTYP 
4811 026764 000407 Au ACTLPX 
4812 026766 012737 000003 006550 ACTLLP: MOV #3,MLTYP 
4813 026774 000403 KR ACTLPX 
rr Ht} 026776 012737 000004 006550 ACTRLP: MOV #4, MLTYP 
4816 027004 022737 000003 006546 ACTLPX: CMP #ACT,MODIYP BE SURE IN ACTIVE IF TRYING TO SET LOOP 
4817 027012 001415 BEQ ACTLXX ; BR IF IN ACTIVE 
4818 027014 112737 177777 003131 MOVB #-1,P$GDBD 
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CVCLHA.P11 
4819 027022 
4820 027026 
4821 027026 
4822 027032 
4823 0270 
4824 027040 
4825 027042 
4826 027046 


027052 


25-JUL-80 10:26 


005037 
012746 


000207 


006550 
011611 
000001 


000004 
003130 
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ACTION TABLE AND ROUTINES 


;CLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET 


CLR 
PRINTF 


ACTLAK: CLRB 
RTS 


MLTYP 
#CLIBDL 


PSNNUF 
PC 





> CLEAR NOT-ENOUGH FLAG 


#CLIBDL 


SEQ 0114 


7 (SP) 
) 
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CVCLHA.P11 25-JUL-80 10:26 ACTION TABLE AND ROUTINES SEQ 0115 
4829 
4830 ; RX ALLOCATE CODE 
4831 027054 012737 006132 O0C6424 GIRO: MOV #PTRIAB,TXPTR  ; INIT TRANSMIT MESSAGE POINTER 
4832 027062 012737 006226 006426 MOV PPIRIS. CMPPTR INIT COMPARE MESSAGE POINTER 
re tty 027070 012737 006322 006422 MOV #PTR23,RXPTR ; INIT RECEIVE MESSAGE POINTER 
me tH 027076 013737 006430 006460 MOV CMPTOT,RXMTOT ;MAKE COMPARE AND RX MESSAGE COUNTS EQUAL 
4837 
4838 027104 005037 006560 GTREX: CLR FLAG CLEAR FLAG 
4839 027110 005037 006464 CLR OPVAR CLEAR OPTIONAL VARIABLE COUNTER 
4840 027114 005937 006466 CLR PSCNT ;CLEAR PASS COUNT 
4841 027120 005037 006470 CLR ERRCNT ;CLEAR ERROR COUNT 
4842 027124 005037 011414 CLR MGLCNT ;CLEAR GLITCH COUNT 
4843 027130 005037 011416 CLR MHRCNT ;CLEAR HARD ERR. COUNT 
4844 027134 012737 000626 011404 MOV #626, SYNCW ;SET UP SYNCW FOR 226 SYNC +TSOM 
4845 027142 052737 000200 011366 BIS #811? ,DPVP1 ;SET UP PARAM WORD FOR 226 RX SYNC 
4846 027150 005737 011420 TST RNODE 
4847 027154 001406 BEQ 1$ ;1F NON ITEP GO TO 1 
4848 027156 042737 000200 011366 BIC #B1T7,0PVP1 ;SET UP FOR 26 SYNC WORD ON RX. 
4849 027164 012737 000426 011404 MOV #426,SYNCW ELSE SET UP SYNC FOR 26 AND TSOM 
4850 027172 004737 017264 1$: JSR PC,LOGDVI ;LOG ABOUT TO INIT DEVICE 
re tt 027176 004737 031232 JSR PC,DVINIT ; INIT DEVICE 
4853 027202 012737 001000 006502 GTRX2: MOV #BUFLIM,CURCC ;SET CHAR COUNT TO ‘‘BUFLIM'' NO. OF BYTES 
4854 027210 012737 004132 006510 MOV WRXBUF,CURADD ;SET UP RX BUFFER AS CURRRENT ADD. 
4855 027216 013737 006422 006506 MOV RXPTR,CPTR 
4856 027224 Der ee 000010 006500 MOV #10, ASGTYP SET UP FOR He z FILL RX BUFFERS 
4857 027232 004737 021202 JSR PC ,BLDBUF :CLEAR RX BUFFE 
4858 027236 013702 006546 MOV MODTYP,R2 
4859 027242 006302 ASL R2 
4860 027244 000172 006562 JMP @MODE (R2) sMODE DISPATCH 
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027250 


027276 


013737 
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006422 


027434 


006504 
006456 
006560 
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RECEIVE MODE SECTION 
» SBTTL RECEIVE MODE SECTION 
; FUNCTIONAL DESCRIPTION: 
; RECEIVE-ONLY (OR ONE-WAY-IN) ROUT 
IN THIS MODE 4 TESTING THE DEVIC 
GF. AFTER A 


MESSAGES, THE *DATA RECEIVED CAN B 


XPECTATION 


E 
R OF 
F EXPECT 


— 
nm 
— 
om 


; _— eee” * 
; @MODE (R2) ;DISPATCH TO MODE BASED ON MODE TYPE IN R2 


RXON2: MOV RXPTR,CPTRR 
MOV RXMTOT ,DVRCT ;SET UP Nery COUNT 
BIS WORX+M#ERKX,FLAG ;SET UP RX QUE 
CLR CPTR al THE TX POINTER 
ALLTR ;GO R 


SEQ 0116 


' 
eed 
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027302 


027336 


25-JUL-80 


042737 


000137 


10:26 


000002 


027434 


006554 
006506 
006442 
006560 


nN 9 
MACY11 30A(1052) 25-JUL-80 10:29 PAGE 118 
TRANSMIT MODE SECTION 


TRANSMIT MODE SECTION 


~SBTTL 


TXONLY: 


TXOM™: 


FUNCTIONAL DESCRIPTION: 
ANSMIT=ONLY (OR ONE=WAY-OUT) ROUTINE 

IN. THIS MODE OF TESTING A LIST OF MESSAGES 

EXPECTING ANY DATA TO BE RECEIVED. A wit t 


1S TRANSMITTED WITHOUT 
ITION COUNT CAN BE 


SPECIFIED TO REPETITIVELY TRANSMIT THE L 


; SUBORDINATE ROUTINES USED: 
> “ALLTR'' 


; nanan ™ aaa: 


@MODE (R2) 


#DATCKB, PARAM 
TXPTR,CPTR 
TXMTOT ,OVICT 
MQTX*METX, FLAG 
CPTRR 

ALLTR 


;DISPATCH TO MODE BASED ON MODE TYPE IN R2 


;SET NOCHECK 


:COPY COUNTER FOR THIS PASS 
TSET THE QUE TX FLAG . 


ach eee RX POINTER 
x. 


SEQ O17 
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027342 


027372 
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013737 


000137 


006444 


027434 


006442 


006560 


MACY11 30A(1052) 


~SBTTL 


Be Se Se Be Be Be Be Bs Be Se Se Be Be Be Be 


PLCK: 


PLCK2: 
PLCK3: 








B 
25-JUL-80 


PASSIVE MODE SECTION 
PASSIVE MODE SECTION 


"FUNCTIONAL oe tees aaet 
PASSIVE MODE SEC 


10 
10:29 PAGE 119 





SEQ 0118 


TION 
IN THIS MODE OF TESTING, THE DEVICE'S RECEIVER IS ENABLED IN 
EXPECTATION OF RECEIVING A MESSAGE. THEN CVERY TIME A MESSAGE IS 


RECEIVED, 


RECEIVED DATA 


SUBORDINATE ROUTINES USED: 


"mi Ter” 


eonteay™ soon * + 


@MODE (R2) 


TXMTOT ,OVICT 
TXPTR,CPITR 
RXPTR,CPTRR 
#QRX+#ERK, FLAG 
ALLTR 


A MESSAGE IS TRANSMITTED. DATA CHECKING CAN BE DONE ON THE 


;DISPATCH TO MODE BASED ON MOCE TYPE IN R2 


;SET UP THE TRANSMIT COUNT 

;SET UP CPTR TO TRANSMIT POINTER 
SET UP CPTRR TO REC POINTER 
;SET UP Q@ AND EXPECT RX 

AND GO RX FIRST MSG. 





C 10 
10 
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CVCLHA.P11 25-JUL-80 10:26 IVE MODE SECTION 

4932 .SBTTL ACTIVE MODE SECTION 

4933 

4934 3+ 

4925 : FUNCTIONAL DESCRIPTION: 

4936 : ACTIVE MODE SECTION 

4937 ; IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED AND 

4938 : MESSAGES ARE EXPECTED TO BE RECEIVED. RECEIVED DATA CAN BE COMPARED 
4939 : AGAINST "‘EXPECTED'' DATA IF DATA=CHECKING IS ENABLED 

4940 ; NOTE: IF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE 
tee3 z LINK MUST BE A FULL DUPLEX LINK! 

4943 : SUBORDINATE ROUTINES USED: 

4944 : 

4945 ; “ALLTR'' 

4946 ; 

4947 ; CALE SEQUENCE : 

rer | ; @MODE (R2) :DISPATCH TO MODE BASED ON MODE TYPE IN R2 
4 :-- 

4950 

4951 027376 013737 006444 006442 ALCK: MOV TXMTOT,DVTCT 

4952 027404 013737 006424 006506 MOV TXPTR,CPTR :SET UP TX COUNTS 

4953 027412 013737 006460 006456 MOV RXMTOT,DVRCT :SET UP COUNTS 

4954 027420 013737 006422 006504 MOV RXPTR,CPTRR 

027426 052737 000314 006560 BIS MORK +HOTX+METX+MERX, FLAG 











SEQ 0119 
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CVCLHA.P11 25-JUL=80 10:26 TRANSMIT = RECEIVE FOR ALL STANDARD MODES SEQ 0120 
ree .SBTTL TRANSMIT = RECEIVE FOR ALL STANDARD MODES 
4962 ioe 
4963 ; FUNCTIONAL DESCRIPTION: 
4964 ; THIS CODE PERFORMS THE FOLLOWING FUNCTIONS 
4965 ; 1.) IF RX BUFFERS ARE TO BE QUED, TELL DEVICE 
4966 ; CODE TO QUE THEM ,LOG RECEIVE QUED. 
4967 ; 2.) IF TX BUFFERS ARE TO QUED ,TELL DEVICE 
4968 : CODE TO QUE THEM, LOG TRANSMIT QUED. 
4969 3.) WAIT FOR EITHER RECIVE BUFFER OR TRANSMIT BUFFER OR 
4970 BOTH TO COMPLETE 
4971 : 4.) IF RECEIVE COMPLETE LOG IT UPDATE RX TABLE IF DATA 
4972 : CHECKING. 
4973 ; 5.) IF TRANSMIT COMPLETE LOG IT 
4974 ; 6.) WHEN BOTH TRANSMIT AND RECIEVE LISTS ARE DONE 
rae : GO TO THE COMPARE BUFFER CODE 
4977 + SUBORDINATE ROUTINES USED: 
4978 ; “DVRXQ'' -QUE RECEIVE BUFFER SPACE TO DEVICE 
4979 : +P OGRHO’=LOG RECEIVE BUFFER SPACE TO EVENT LOG 
4980 ; “LOGTXQ''=LOG TRANSMIT BUFFER QUED TO EVENT LOG 
4981 : “"DVTXRX''=QUE TRANSMIT BUFFER AND WAIT FOR RX 
4982 ; OR TX TO COMPLETE 
4983 : “LOGRXC''=LOG RECEIVE BUFFER COMPLETED TO EVENT LOG 
rhe ; "LOGTXC''=LOG TRANSMIT BUFFER COMPLETED TO EVENT LOG 
4986 : USE OF FLAG BITS: 
4987 ; QRX = SET ON INPUT TO ALLTR IF REC IS TO BE QUED TO 
4988 ; DEVI7E. CLEARED BY DVRXQ AND THEN SET BY DVTXRX 
4989 : WHEN RX BUFFER IS COMPLETED. 
4990 ; QTX - SET ON INPUT TO ALLTR IF TRANSMIT IS TO BE QUED TO 
4991 ; DEVICE. CLEARED ON ENTRY TO DVTXRX AND SET BY DVTXRX 
4992 ; WHEN TX BUFFER IS COMPLETED. 
4993 ; ETX = USED BY DVTXRX TO DETERMINE IF TX BUFFER COMPLETED IS 
4994 ; EXPECTED. 
4995 ; ERX - USED BY DVTHAX TO DETERMINE IF RX BUFFER COMPLETED IS 
4996 : EXPECTED 
4997 ; 
4998 ; 
4999 ; CALLING SEQUENCE: 
$000 : JMP ALLTR :GO TO TRANSMIT-RECEIVE FOR ALL STANDARD MODES 
1 eo 
5002 
5003 
5004 027434 ALLTR: 
$905 027434 032737 000004 006560 ALCKS: BIT #ORK,FLAG 
027442 001420 BEQ ALCK1 :1F NOT RX GO TO TX'S 
5007 027444 013702 006504 MOV CPTRR,R2 
5008 027450 011237 006522 MOV (R2), TEMP2 
5 027454 012237 006452 MOV (R2)+,DVRKA 
§010 027460 011237 006524 MOV (R2), TEMPS 
5011 027464 011237 006454 MOV (R2) ,DVRCC 
5012 027470 010237 006504 MOV R2,CPTRR 
13 027474 004737 032104 JSR PC ,DVRXQ 7G0 QUE DEVICE 
5014 027500 004737 017220 JSR PC ,LOGRXQ 7LOG REC QUED 
5015 027504 032737 000010 006560 ALCK1: BIT #OTX.FLAG 
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CVCLHA.P11  25=JUL-80 10:26 TRANSMIT = RECEIVE FOR ALL STANDARD MODES 
5016 027512 001416 BEQ ALCK2 :IF NO TX''S GO TO 2 
$017 027514 01370¢ 006506 MOV CPTR,R2 
5018 027520 011237 006522 MOV (R2). TEMP2 
5019 027524 012237 006436 MOV (R2)+,DVTXA 
5020 027530 011237 006524 MOV (R2), TEMPS 
5021 027534 012237 006440 MOV (R2)+,DVTCC 
5022 027540 010237 006506 MOV R2,CPTR 
3023 027544 004737 017164 JSR PC,LOGTXQ 
344 027550 004737 032206 ALCK2: JSR PC ,DVT¥YRX :GO TO TX AND RX SUB ROUT. 
5027 027554 032737 000004 006560 BIT #ORX, FLAG :CHECK FOR REC. MSG. 
5028 027562 001514 BEQ ALCKS 
5029 027564 013737 006452 006522 MOV DVRXA, TEMP2 
5030 027572 013737 006454 006524 MOV DVRCC, TEMPS 
5031 027600 004737 017236 JSR PC,LOGRXC ;LOG REC COMPLETE 
5032 027604 032737 000004 006554 UPTABL: BIT #ECHOB, PARAM ;1S THIS ECHO MODE (PASSIVE) 
5033 027612 001406 BEQ UPTA4 ;1F NOT GO TO 4 
5034 027614 013702 006506 MOV CPTR,R2 ELSE SET + TO PRESENT TX TABL 
5035 027620 013722 006522 MOV TEMP2, (R2)+ : STORE OFF RX ADD 
5036 027624 013712 006524 MOV TEMPS, (R2) AND CC 
5037 027630 032737 000002 006554 UPTA4: BIT #DATCKB, PARAM 1S DATA a ASKED FOR 
5038 027636 001015 BNE UPTAI :IF $0 GO TO 1 
5039 027640 012737 000001 006456 MOV #01,DVRCT ELSE SET pYACT TOA 1 
5040 027646 013737 006422 006504 MOV RXPTR,CPTRR “RESET POINTER 
5041 027654 022737 000003 006546 CMP #ACT,MODTYP ‘1S THIS ACTIVE 
5042 027662 001002 BNE UPTA 
5043 07668 005237 006456 INC DVRCT :1F YES BUMP COUNT 
5044 027670 000424 UPTA3: BR UPTEX 
5045 027672 013702 006504 YOTAl: MOV CPTRR,R2 
5046 027676 011237 006516 MOV (R2), TEMP sLOAD TEMP WITH PREV. COUNT 
5047 027702 163737 006524 006516 SUB TEMPS, TEMP sLOAD TEMP WITH PREV.COUNT-CURRENT 
50468 027710 013722 006524 MOV TEMPS, (R2)+ 
5049 027714 063737 006524 006522 ADD TEMPS. TEMP2 
5050 027722 013722 006522 MOV TEMP2,(R2)+ :STORE OF NEW ADD 
5051 027726 013712 006516 MOV TEMP, (R2) “AND NEW CC 
3052 027732 162702 000002 SUB #2,R2 :PUT POINTER BACK TO ADDR. 
3054 027736 010237 006504 MOV R2,CPTRR :AND RESTORE IT. 
5056 027742 UPTEX: 
5057 027742 022737 000062 006546 CMP #PAS ,MODTYP 
5058 027750 001007 BNE ALCK2A :1F NOT PASSIVE LOOP THEN GO TO 2A 
5059 027752 042737 000104 006560 BIC MORK+MERKX,FLAG ;CLEAR BOTH EXPECTED AND COMPLETED FLAGS 
5060 027760 052737 000210 006560 BIS MQTX*METX,FLAG ;SET THE TX FLAGS 
3061 027766 000646 BR ALCK1 
5063 027770 005337 006456 ALCK2A: DEC DVRCT ;DEC REC COUNT 
5064 027774 005737 006456 TST DVRCT 71S IT ALL DONE 
5065 030000 001005 BNE ALCK3 :NO. GO CHECK TX 
5066 030002 042737 000004 006560 BIC #ORX, FLAG :CLEAR THE RX FLAG 
5067 030010 005037 006504 CLR CPTRR sYES. CLEAR POINTER 
5068 030014 032737 000010 006560 ALCK3: BIT #OTX, FLAG t1S 11 I 
5069 030022 001447 BEQ ALCK4 ;1F NOT TX THEN GO BACK 
5070 030024 013737 006436 006522 MOV DVTXA, TEMP2 
5071 030032 013737 006440 006524 MOV DVTCC, TEMPS ;LOG TX COMPLETED 


a Poe ieee ne 0) Seen AUS ie Ce OE ae e/g 
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CVCLHA.PT1 =—-.25+JUL-B0 10:26 TRANSMIT = RECEIVE FOR ALL STANDARD MODES SEQ 0122 
0/2 030040 004737 017202 JSR —s- PC, LOGTXC 
5073 030044 005337 006440 DEC DviCcT ;DEC TX COUNT 
5074 030050 022737 000002 06546 CHP APAS,MODTYP 
5075 030056 001078 BNE LCKSA ;1F NOT PASSIVE MODE GO TO 3A 
5076 03006 042731 000210 006560 BIC FOTKSETX,FLAG {CLEAR THE TX. FLAGS 
5077 03 052737 000104 006560 BIS MQARX+ERK,FLAG  ;AND SET THE RX FLAGS 
5078 030074 005737 006442 TST DVICT 
301 05 BNE ALCK3C ;1F MORE RX'S DO IT 


5081 030106 005737 006442 ALCK3A: TST DVTCT :1S IT ALL DONE 

5082 030112 001402 BEQ ALCK3B ;1F NOT GO BACK TO 5 
5083 030114 000137 027434 e.CK3C: JMP ALCKS 

5084 030120 005037 006506 AL CK3B: CLR CPTR :1F SO CLEAR POINTER 
5085 030124 042737 000010 006560 BIC #QTX,FLAG CLEAR TX FLAG 

5086 030132 032737 000002 006554 BIT #DATCKB,PARAM :1S IT DAT CK 
5087 030140 001403 BEQ ALCKGA ; 

5088 030142 005737 006504 ALCK4: TST CPTRR 


5090 030146 001362 BNE ALCK3C :IF SOME RX''S LEFT GO BACK 
5091 030150 005737 006506 ALCKGA: TST CPITR 

5092 030154 001402 BEQ ALCK4B ;BRANCH IF ANY TX'S LEFT 
5093 030156 000137 027550 JMP ALCK2 

5094 030162 AL (KGB: 


5079 030100 0010 
5080 030102 000137 030162 JMP CMPSR ; ELSE COMPARE 
If NOT THEN END WO CKING RX. 


———— ee eS SC a 
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CVCLHA,P11 25-JUL-80 10:26 DATA COMPARISON CODE SEQ 0123 
5048 - SBTTL DATA COMPARISON CODE 
5099 


—_ 
oo 
—o 


++ 
; FUNCTIONAL DESCRIPTION: 


: CMPSR = COMPARE CODE 
: THIS CODE COMPARES THE RECEIVED DATA AGAINST THE 
; EXPECTED AND FILLS THE EVENT LOG WITH 1 OF 3 MSGS. 


NOTE: IF NO DATA CHECKING SKIP THIS CODE 


1.) 4 DATA COMPARISON ENTRY WHICH REPORTS THE NUMBER 
OF COMPARISON ERRORS FOUND. 

2.) A DATA COMPARISON ENTRY WHICH REPORTS DIFFERENCES 
IN REC LENGTH TO COMPARE LENGTH 


oooo 


: 3.) A DATA COMPARISON STARTED ENTRY WHICH REPORTS ADDRESS 
: OF RECEIVE BUFFER AND BYTE COUNT. 

: THIS CODE ALSO REPORTS SOFT ERRORS FOR DATA COMPARISON 

: (THE FIRST 5 ONLY),LENGTH ERROR,AND TOTAL NUMBER OF ERRORS 


: SUBORDINATE ROUTINES USED: 


: “LOGCMP’' = SEE ITEM 3 ABOVE 
“COGCML'' = SEE ITEM 2 ABOVE 
“LOGCMD'' = SEE ITEM 1 ABOVE 


; JUMP TO DATA COMPARISON CODE 


: CALLING SEQUENCE: 
: JMP CMPSR 


oo 
BOIS SSNOOK WN SO OMONA MEU MHOSR WFAN 


ee ee ee ee eee 
rt ey te epee Po te sey aba fet teak te + pet ete te | 
NOW 


wre re Lele eal eal esl eal ealeal Mal eal al al ah sh Ah ah ah ah sh ab ah ah ah a ah ah ah ak ah ah Ah al oak ak al ak al ah sk ak Ak ak al el a eh ah ab ah Ae 


030162 032737 000002 006554 CMPSR: BIT #DATCKB,PARAM ;iS DATA CHECKING TO BE DONE 
030170 001522 BEQ CMPSEX :1F NOT THEN EXIT 
030172 013737 006422 006506 MOV RXPTR,CPIR ;PUT START OF RX POINTERS TO CPIR 
030200 013737 006426 006504 MOV CMPPTR,CPTRR ; AND START OF COMPARE POINTS TO CPTRR 
030206 013737 006460 006456 MOV RXMTOT,DVRCT 
030214 CMPS3: 
030214 013702 006506 MOV CPTR,R2 sMOVE CURRET RX PT.TO R2 
38 030220 011237 006522 MOV (R2), TEMP2 ;MOVE RX ADD TO EVENT LOG 
39 030224 012201 MOV (R2)+,R1 :SET R1 TO START ADD OF RX 
40 030226 012237 006524 MOV (R2)+, TEMPS ;SET CHAR COUNT TO EVENT LOG 
<3 030232 010237 006506 MOV R2,CPTR ;RESTORE RX POINT 
43 030236 013702 006504 MOV CPTRR,R2 ;PUT R2 AT COMPARE TABLE 
144 030242 012203 MOV (R2)+,R3 ;SET R3 TO COMPARE ADD 
145 030244 012204 MOV (R2)+,R4 ;SET R4 TO COMP CC 
146 030246 010237 006504 MOV R2,CPTRR RESTORE POINTER 
147 030252 010437 006526 MOV R4, TEMPS 
4 030256 004737 017332 JSR PC ,LOGCMP ;LOG COMPARE START. 
150 030262 020437 006524 CMP R4, TEMPS 1S COMPARE COUNT = TO RX COUNT 
151 030266 001410 BEQ CMPS7 ;1F SO GO TO 7? 
152 030270 005237 006470 INC ERRCNT 
153 030274 ERRSOFT 1,EDDLE,.ERR10 ;PRINT ERROR 


a SSS Ss 
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CVCLHA.P11 25-JUL-80 10:26 DATA COMPARISON CODE SEQ 0124 | 


5184 030274 104457 TRAP CSERSOFT 
5155 030276 000001 WORD 1 | 
$156 030300 014423 “WORD  EDDLE 
5157 030302 016640 “WORD —_ERR10 
5158 080304 004737 017350 JSR PC, LOGCML ;LOG LENGTH ERROR 
5160 030310 005037 006526 CMPS7: CLR TEMP4 ;CLEAR BAD BYTE COUNTER 
5161 030314 012737 000001 006514 MOV #1 ,OF SET :SET OFSET BYTE COUNT TO 1 
5162 030322 122123 CMPS1: CMPB (R1)+,(R3)+ ; COMPARE RX WITH EXPETED 
5165 030324 001422 BEQ  — CMPS6 SIF EQUAL THEN GO TO 6 
5105 030326 005237 006526 CMPS2: INC  TEMP4 :INC BAD COUNT 
5166 030332 023727 006526 00005 CMP TEMP 4, #5 SIS IT MORE THEN 5 
5167 030340 101014 BHI CMPS6 :I1F SO GO FOR MORE 
5168 030342 114337 906536 MOVB -(R3) ,GOOD :STORE GOOD BYTE FOR ERROR 
5169 030346 114137 006537 MOVB -(R1),BAD ;STORE BAD BYTE FOR ERROR 
5170 030352 005237 006470 INC __ERRCNT 
5171 030356 ERRSOFT 2,EDDDE,ERR1 ;REPORT COMPARISON FAILURE TO OPR. 
$172 030356 104457 TRAP CSERSOFT 
5173 030360 000002 WORD 2 
5174 030362 014460 WORD EDDDE 
5175 030364 016550 “WORD ERR1 
5176 030366 005201 INC RI 
5177 030370 005203 INC —RB 
5178 030372 005237 006514 CMPS6: INC OF SET s INC OFFSET 
5179 030376 005304 DEC R4 ELSE DEC CHAR COUNT AND SEE IF 0 
$180 030400 001350 BNE CMP 1 ZIF NOT GO BACK 
5181 930402 005737 006526 TST TEMPS :SEE IF ANY CMP ERRS FOR THIS MSG 
5182 030406 001410 BEQ CMPSSA ;BR If NONE 
$183 030410 005237 006470 INC __ ERRCNT 
5184 030414 ERRSOFT 3,EDDDE,ERR2 ;REPORT # OF MISMATCHES FOR MESSAGE 
5185 030414 104457 TRAP — CSERSOFT 
5186 030416 000003 WORD 3 
5187 030420 014460 “WORD  EDDDE 
5188 030422 016612 “WORD ERR2 
5189 030424 004737 017366 CMPS5: JSR PC,LOGCMD ;LOG DATA ERROR IN COMPARE 
5190 030430 CMPSSA: 
5191 030430 005337 006456 DEC —DVRCT 
5192 030434 001267 BNE —CMPS3 ;1F NOT ALL DONE GO BACK 
| 
| 





1 10 
CVCLHA DPV=11 DATA CUMM, LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 126 


CVCLHA,P11 25-JUL-80 10:26 MODEM CHANGE REPORTS SEQ 0125 
5194 SBTTL MODEM CHANGE REPCRTS 
5195 
5196 : 
5197 j “FUNCTIONAL DESCRIPTION 
5198 ; HIS SECTION REPORTS THE NUMBER OF MOMDEM STATUS CHANGES 
5199 $ THAT OCCUR ON EACH PASS. THE ERROR IS ONLY REPORTED IF 
5200 ; THERE WERE ANY CHANGES IN OTHER WORDS A COUNT OF ZERO IS 
5201 ; NOT REPORTED. THE CHANGES ARE REPORTED IN TwO CLASSES .. 
5202 ; HARD ERRORS AND GLITCHES. HARD ERRORS ARE WHEN THE DEVICE 
5203 3 1S ABLE TO LATCH UP THE BAD MODEM STATUS. GLITCHES OCCUR 
5204 3 WHEN THE MODEM STATUS CHANGES TO CAUSE A DATA SET CHANGE 
5205 , INTERRUPT BUT THE CHANGE DOES NOT OCCUR LONG ENOUGH FOR 
5206 ; THE DEVICE TO LATCH THE DATA 
5207 : 
5208 ; INPUTS: 
5209 ; "MGLCNT"' - CONTAINS NUMBER OF GLITCH ERRORS 
a¢i9 ; “MHRONT"' - CONTAINS NUMBER OF HARD ERRORS 
§212 : OUTPUTS: 
5213 ; “MGLCNT" -ZJEROED BY THIS SECTION 
$214 : “MHRCNT'' -27EROED BY THIS SECTION 
5215 : 
5216 33 
5217 see 
5218 
5219 030436 005737 011414 CMPSEX: TST MGLCNT sCHECK FOR ANY GLITCH ERRORS 
5220 030442 001003 BNE MCREP if NON ZERO REPORT THEM 
$221 030444 005737 011416 TST MHRCNT sCHECK FOR ANY HARD ERRORS 
ase 030450 001412 BEQ ENDPS -]F NONE GO TO END OF PASS 
aces REPORT ANY MODEM ERRORS HERE 
$226 030452 005237 006470 MCREP: INC ERRCNT ;BUMP ERROR COUNT 
5227 030456 ERRSOFT 4,MSCMS,ERRG 
5228 030456 104457 TRAP CSERSOFT 
5229 030460 000004 .WORD 4 
5230 030462 014057 .wORD MSCMS 
5231 030464 016670 -WORD ERRG 
5232 030466 005037 011414 CLR MGLCNT ;CLEAR GLITCH COUNT 
5233 030472 005037 011416 CLR MHRCNT :CLEAR THE HARD COUNT 
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CVCLHA.P11 25-JUL=B0 10:26 INTERNAL END OF PASS CODE SEQ 0126 
$235 .SBITL INTERNAL END OF PASS CODE 
5236 
5237 
5238 pee 
$239 ; FUNCT LONAL DESCRIPTION: 
$240 : THIS CODE INCREMENTS THE PASS COUNT ron THE 
5241 ; EVENT LOG. LOGS THE END OF PASS EVENT 
5242 ; IF "'RPASS' IS A MINUS ONE RETURN TO MODE 
5243 : DISPATCHER. IF NOT -1 THEN DECREMENT RPASS 
5244 : AND IF ‘'RPASS'' IS THEN = TO 0 GO TO DCLT PROMT 
ast? ; IN NOT = TO 0 THEN GO BACK TO MODE DISPATCHER 
u 3 
este : SUBORDINATE ROUTINES USED: 
$249 : “LOGEOP’' = LOG END OF PASS TO EVENT LOG 
34 eee 
3538 030476 005237 006466 ENDPS: INC PSCNT ;BUMP PASS COUNT 
5254 030502 013737 006464 006526 MOV OPVAR, TEMP4 
5255 030510 013737 006466 006522 MOV PSCNT, TEMP2 
$256 030516 013737 006470 006524 MOV ERRCNT, TEMPS 
eee 030524 004737 017404 JSR PC ,LOGEOP :LOG END OF PASS 
5259 030530 022737 177777 006556 CMP #-1,RPASS SEE IF RPASS=-1 
5260 030536 001403 BEQ 1$ :IF IT IS DON'T DECRMNT, LOOP FOREVER 
5261 030540 005337 006556 DEC RPASS ;DEC PASS COUNT 
$262 030544 001402 BEQ 2$ ;IF DONE EXIT TEST 
5263 030546 000137 027202 1$: JMP GTRK2 sELSE GO BACK AND DISPATCH 
5264 030552 000137 024122 23: JMP GTRAS ;WHEN RPASS=0 GO BACK TO ‘‘DCLT>’ 


10 
CVCLHA DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL- -80° 10:29 PAGE 128 


CVCLHA.P11 25-JUL-80 10:26 DOWN-LINE=LOAD SECTION SEQ 0127 
3306 SBTTL DOWN=LINE=LOAD SECTION 
5268 ; “FUNCTIONAL DESCRIPTION: 
5269 ; DOWN LINE LOAD IS NOT SUPPORTED BY THIS DEVICE. 
5270 ; IF THIS MODE IS CALLED BY THE COMMAND LINE INTERPRETER 
$271 : THEN A MESSAGE WILL BE PRINTED ....THAT SAYS DOWN LINE 
asté ; LOAD IS NOT!! SUPPORTED BY THIS DEVICE. 
5274 
5275 
5276 
5277 030556 C3 
5278 030556 PRINTF #DLLCM 
5279 030556 012746 013230 MOV #DLLCM,-(SP) 
280 030562 012746 000001 MOV #1,-(SP) 
5281 030566 010600 MOV SP,RO 
5282 030570 104417 TRAP CSPNTF 
5283 030572 062706 000004 ADD #4,SP 
5 030576 000137 024122 JMP GTRAS 


L 10 
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CVCLHA DPV-11 DATA COMM, LINK TEST MACY11 %0A(1052) 25=JUL-80 29 PAGE 129 
CVCLHA.P11 25-JUL-80 10:26 TALK MODE SECTION SEQ 0128 
5286 .SBTTL TALK MODE SECTION 
5287 
5288 p++ 
5289 ; FUNCTIONAL DESCRIPTION: 
5290 ; TALK MODE SECTION 
5291 : IN THIS MODE, THE ‘'TALK'' END OF THE LINK TRANSMITS OPERATOR 
5292 : SPECIFIED MESSAGES UNTIL A ‘‘EXIT'' MESSAGE IS TYPE. AT THAT POINT, 
2537 ; THIS END OF THE LINK GOES INTO ‘‘LISTEN'' MODE. 
3344 ; SUBORDINATE ROUTINES USED: 
5297 3 "LOGTXQ'' = LOG TX BUFFER QUED TO EVENT LOG 
5298 ; “DVTXRX'' = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE 
i344 ; “LOGTXC'' = LOG TX COMPLETE TO EVENT LOG 
5301 ; CALLING SEQUENCE: 
4 : JMP QMODE (R2) DISPATCH TO MODE BASED ON MODE TYPE IN R2 
5304 
5305 030602 TALCK: 
5306 030602 042737 000002 006554 BIC #DATCKB,PARAM  ;SET NOCHECK 
5307 030610 012702 002520 MOV #OPBUF ,R2 
5308 030614 012722 177777 1$: MOV #-1,(R2)+ sCLEAR OUT OPBUFFER FIRST 
5309 030620 022702 002642 CMP #OPEND,R2 
5310 030624 001373 BNE 1$ 
5311 030626 GMANID OPRMM,OPBUF,A,0,1,72.,NO :GET TALK MESSAGE 
5312 030626 104443 TRAP C$GMAN 
5313 030630 000406 R 10001$ 
5314 030632 002520 WORD OPBUF 
5315 030634 000142 WORD TSCODE 
5316 030636 013165 WORD OPRMM 
5317 030640 000000 WORD 0 
5318 030642 000001 ~WORD TSLOLIM 
5319 030644 000110 .WORD TSHILIM 
5320 030646 10001$: 
5321 030646 005002 CLR R2 sNOW GET CHAR COUNT 
5322 030650 122762 000377 002520 2%: CMPB #377 ,OPBUF (R2) 
5323 030656 001402 BEQ 3$ 
5324 030660 005202 INC R2 
5325 030662 000772 Re 2$ 
east 030664 010237 002166 3$: MOV R2,0PCNT 
5328 030670 012737 002520 006436 MOV #OPBUF ,DVTXA :SET UP TX ADDR. 
5329 030676 012737 002520 006522 MOV #OPBUF ,TEMP2 
5330 030704 013737 002166 006524 MOV OPCNT, TEMP3 
5331 030712 013737 002166 006440 MOV OPCNT ,DVTCC SET UP TX CC 
833 030720 004737 017164 JSR PC,LOGTXQ 
5333 030724 052737 000210 006560 BIS WQTX¢METX,FLAG ;SET UP FLAGS 
3333 030732 005037 006504 CLR CPTRR sCLEAR RX POINTER 
3536 030736 004737 032206 JSR PC ,DVTXRX 
$338 030742 013737 006436 006522 MOV DVTXA, TEMP2 
5339 030750 013737 006440 006524 MOV DVTCC, TEMPS 
5340 030756 004737 017202 JSR PC ,LOGTXC 
5341 030762 022737 054105 002520 CMP #''EX ,OPBUF CHECK FOR EXIT 













1 
Sap oe DPV-11_ DATA COMM. LINK TEST MACY11 gg 25-JUL-80 10:29 PAGE 130 
CVCLHA.P11 25-JUL-80 10:26 TALK MODE SECTION SEQ 0129 


030770 001304 TALCK 
052111 002522 OD eats 


L 
000210 006560 WQTX*METX,FLAG ;CLEAR THE TX BITS 


000006 006546 #LIS,MODTYP :CHANGE TO LISTEN MODE 
031016 000137 027202 GIRX2 ‘AND GO BACK TO DISPATCH 


| 
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CVCLHA_DPV=11_ DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 :29 PAGE 131 
CVCLHA.P11 25-JUL=80 10:26 LISTEN MODE SECTION SEQ 0130 

5348 .SBTTL LISTEN MODE SECTION 

5349 

5350 p+ 

5351 : FUNCTIONAL DESCRIPTION: 

5352 ; LISTEN MODE SECTION 

5353 ; IN THIS MODE, THE "'LISTEN’' END OF THE LINK PRINTS ALL OF THE MESSAGES 
5354 ; RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE. IF THE MESSAGE 

eee, : ; RECEIVED IS AN "EXIT'’ MESSAGE, THEN THE NODE ENTERS ‘'TALK'' MODE. 

2320 : SUBORDINATE ROUTINES USED: 

5359 : “DVRXQ'' = QUE RECEIVE BUFFER SPACE TO DEVICE 

5360 ; “LOGRXQ'’ = LOG RECEIVE BUFFER QUED TO EVENT LOG 

5361 : "DVTXRX'’ = WAIT FOR RX TO COMPLETE 

aue8 ; "LOGRXC'' = LOG RX COMPLETE TO EVENT LOG 

5364 ; CALLING SEQUENCE: 

2368 ; JMP QMODE (R2) :DISPATCH TO MODE BASED ON MODE TYPE IN R2 
5367 F 

5368 031022 042737 000002 006554 LISCK: BIC #DATCKB,PARAM  ;CLEAR CHECK BIT 

5369 031030 PRINTF #LISP sPRINT PROMPT FOR OPK. 

5370 031030 012746 013154 MOV #MLISP,-(SP) 
5371 031034 012746 000001 MOV #1,-(SP) 
5372 031040 010600 MOV SP,RO 
5373 031042 104417 TRAP CSPNTF 
5374 031044 062706 000004 ADD #4,SP 
§375 031050 012737 002520 006452 LISCKA: MOV #OPBUF ,DVRXA :SET DEVICE UP TO REC AT OPBUF 

5376 031056 012737 002520 006522 MOV #OPBUF , TEMP2 

5377 031064 012737 000122 006454 MOV #82. ,DVRCC :SET UP CHAR COUNT TO 82. 

$378 031072 012737 000122 006524 MOV #82. , TEMPS 

5379 031100 052737 000104 006560 BIS WORX+MERX,FLAG ;SET UP FLAG 

2380 031106 005037 006506 CLR CPTR CLEAR THE TX. 

5382 931112 004737 032104 JSR PC,DVRXQ sQUE RX 

3382 031116 004737 017220 JSR PC,LOGRXQ 

2385 031122 004737 032206 JSR PC ,DVTXRX :GO TO DEVICE RX. SUBROUTINE 

5387 031126 013737 006452 006522 MOV DVRXA, TEMP2 

5388 031134 013737 006454 006524 MOV DVRCC, TEMPS :SET UP ADDR.AND CC. 

538% 031142 004737 017236 JSR PC,LOGRXC :LOG COMPLETED 

5390 031146 063737 006452 006454 ADD DVRXA,DVRCC 

5391 031154 105077 155274 CLRB aDvRCc 

3392 031160 PRINTF #OPBFPT 

5393 031160 012746 002514 MOV #OPBFPT,-<(SP) 
5394 031164 0127 000001 MOV #1,-(SP) 
5395 031170 010600 MOV SP ,RO 
5396 031172 104417 TRAP CSPNTF 
5397 031174 062706 000004 ADD = s«#4, SP 
5398 031200 022737 054105 002520 CMP #'EX ,OPBUF COMPARE FOR EX OF “EXIT' 

5399 031206 001320 BNE LISCKA J s1F NOT EXIT THEN GO BACK 

$400 031210 022737 052111 002522 CMP #''LT OPBUF +2 s1F FIRST HALF OK CHECK NEXT PART 

5401 031216 001314 BNE LISCKA :1F NOT EXIT THE GO BACK 

2608 031220 012737 000005 006546 MOV #TAL ,MODTYP ;CHANGE MODE TO TALK 

$403 031226 000187 027202 JMP GTRKD “RETURN TO DISPATCHER 


CVCLHA DPV=-11 DAA COMM. LINK TEST 
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LISTEN MODE SECTION 
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SEQ 0131 
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MACY11 gts 25-Jul-80. 10: 29 PAGE 133 
VICE FUNCTION SUBROUTINES 


DEVICE FUNCTION SUBROUTINES 


~SBITL 


-SBTTL 


DVINIT: 


INPUTS: 


DEVICE INIT SUBROUTINE 


+ 
FUNCTIONAL ee teceee te 


DVINIT= DEVICE INIT ROUTINE 
THIS ROUTINE IS DEVICE DEPENDENT CODE THAT INITS 


THE DEVICE BEING TESTED 


IT SETS THE DEVICE UP TO THE MODE IT IS TO RUN IN AND 
INITIATES THE START,STACK,ACK SEQUENCE IF THE A sar Ciphene 
NODE) INPUT INDICATES THE REMOTE NODE IS NON-ITEP 


“CTSSR" 
“CLRRTS" 


“FHDPLX'’ INDICATES IF MODE IS FULL OR HALF DUPLEX. 
ADDRESS POINTERS (SELO,... 


CLEAR REQUEST TO SEND ROUTINE 


"DVINS1'' = SEND CONTROL AND REC OR TIME OUT 


“LGDVE" 


CALLING SEQUENCE: 


LOG DEVICE ERROR TO EVENT LOG 


JSR PC,DVINIT 


sMASTER CLEAR DEVICE 
MOV #WRESET,@TXCSR 


TSTB @RXCSR 
BEQ DVINI 


REPORT ERROR IF RESET 


;DOES NOT WORK 


MOV #DVEMO, TEMP2 
MOV @RXCSR, TEMPS 
MOV @TXCSR, TEMPS 
JSR PC ,LGDVE 


INC ERRCNT 
ERRSOFT 5,0VEMO,ERR15 


;D0 A MASTER CLEAR 


;SEE IF IT WORKED 
;BRANCH IF OK 


TRAP 
;LOAD UP ERRM, AND REG OUTPUTS 
;LOG TIME OUT WAITING FOR RUN 
TRAP 
. WORD 


. WORD 


(1=FULL) 
) ALREADY POINT TO DEVICE'S REG.S 


"MLTYP’’ INDICATES THE LOOP TYPE (1=TTL,2=CAB, 3=RM,4=LM) 
""RNODE’’ INDICATES THE TYPE OF REMOTE NODE (ITEP= 


SUBORDINATE ROUTINES USED: 
CLEAR TO SEND SUB ROUTINE 


1,NON-ITEP=0) 


CSBRK 


‘olemeeid 
DVEMO 


SEQ 0132 
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DATA COMM, LINK 
25-JUL-80 10:26 


016722 
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000010 
000001 
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000002 
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000002 
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006620 
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006552 


TEST 


006560 
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006550 


160004 


006550 


006546 


157742 
006620 


006522 
006524 
006526 
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006560 
006624 


002646 


MACY11 30A(1052) 
DE 


DVINI: 


DVINS: 


DVIN3A: 


DVIN38: 


DVIN39: 


DVIN37: 


DVING1: 


BR DVINIT 

:SET TTL LOOP IF REQU'D 
BIC #3,FLAG 

BIC #TTLL,aTXCSR 
CMP @TTL MLTYP 
BNE DVIN 

BIS #TTLL,@TXCSR 
BR DVIN3? 

CMP #CABLE ,MLTYP 
BEQ DVIN37 

CMP #00W, MODTYP 
BNE DVINSA 

JMP DVINEX 

MOV #OTR,@RXCSR 
MOV #2000, TIMER 
1ST TIMERI 

BNE DVIN39 

:SET ERROR FOR NO MODEM 
MOV #DVEM6, TEMP2 
MOV ARXCSR, TEMPS 
MOV aTXCSR, TEMPG 
JSR PC ,LGDVE 

INC ERRCNT 
ERRSOFT 11,DVEM6,ERR13 
BR DVIN3A 

BREAK 

MOV ARXCSR,IRKCSR 
BIT #B1T9, IRXCSR 
BEO DVIN3 

MOV DPVP1,@PCSAR 
TST RNODE 

BNE DVINEX 

TST FHDPLX 

BEQ DVINEX 

:SET UP TO SEND STRT 
MOVB = #5, HOMSG+1 
BIS @RXM' TX, FLAG 
MOV #60. TIMERS 


JSR PC,CTSSR 
#6, HOACC 


dD 11 
25-JUL-80 10:29 PAGE 134 
VICE INIT SUBROUTINE 


«WORD  ERRI3 
;G0 BACK AND TRY MSTR CLR AGAIN IF ERROR 


INPUT AND OUTPUT INT FLAGS 
INTERNAL LOOP 
L_ SELECTED 


OT GO TO 3 
SET INTERNAL LOOP 


nn mm 
mm =s+>>y 
z=-4zD 


;1F CABLE LOOP SKIP CHECK 
;FOR MODEM READY 


sCHECK IF DLL 
;BRANCH IF NOT DLI 
sELSE EXIT 


SET UP DTR. 


;if TIMER NOT OUT GO TO 39 


READY 


TRAP CSERSOFT 

«WORD 11 

«WORD DVEM6 

-WORD ERR13 
THEN TRY TO SET DTR AGAIN 

TRAP CSBRK 


:GET COPY OR RXCSR 
71S MODEM READY SET 


;SET UP PCASAR 
;CHECK REMOTE NODE 
sEXIT IF ITEP 

71S THIS FULL DUPLEX 
;BANCH IF NOT 


SEQ 0133 


— 11 
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CVCLHA.P11 25-JUL-80 10:26 DEVICE INIT SUBROUTINE SEQ 0134 
5518 031560 004737 033346 JSR PC, DVIN31 :G0 TX STRT AND CHK FOR RX, 
5519 03:564 005737 006624 TST TIMERS 
3280 031570 001466 BEQ DVINS1 ;1F TIMER EXPIERED EXIT 
5522 031572 022737 000006 002660 DVING: CMP #6, RHDMCC 1S THE RCVD=STRT 
5523 031600 001441 BEQ DvIN N8& ilf $0 The “ee 
5524 031602 022737 000007 002660 CMP }. RHDMCC :1S IT A STA 
344 031610 001360 BNE DVING1 :1F NOT stack ETIMER GO BACK 
5527 031612 004737 033476 DVIN9: JSR PC,CTSSR SET REQUEST TO SEND 
5528 031616 042737 001010 006560 BIC #QTX'PAD,+LAG  :CLEAR TX COMPT FLAG. 
5529 031624 012737 000001 002646 MOV #1, HDMCC SET UP ACK 
5530 031632 Oiez at 002645 011376 MOV #HDMSG+1,MSGPTR :SET UP POINTER 
5531 031640 013737 002654 011400 MOV HDMC ,MSGCC 
5532 031646 012737 000010 011402 MOV #8. SYNCC SET UP SYNC COUNT 
5533 031654 052777 000120 157470 BIS aTXENA:TINTEN, aTxCsR 
5534 031662 032737 000010 006560 DIVN91: BIT #QiX,FLAG 
5535 031679 001053 BNE DVINEX sEMIT IF ACK SENT 
5536 031672 BREAK 
5537 031672 104422 TRAP C$BRK 
5538 031674 005737 006624 TST TIMERS 
5539 031700 001370 BNE DIVN91 sIF NOT TIMER EXPIRED RECHK Tx. 
Ee 031702 000421 BR DVIN81 ;1F TIMER OUT REPORT IT 
5542 031704 012737 000007 002646 DVIN8: MOV #7, HDMCC SET POTINTER TO STACK 
5543 031712 004737 033346 JSR PC,DVIN31 AND GO SEND STACK 
5544 031716 005737 006624 TST TIMERS 
5545 031722 001411 BEQ DVIN81 :REPORT ganon IF TIME OUT 
5546 031724 022737 000001 002660 CMP #1, RHDMCC :1S IT ACK RCVD? 
5547 031732 001432 BEQ DVINEX :1f SO EXIT 
5548 031734 022737 000007 002660 CMP #7 ,RHDACC s1S IT STACK RCVD 
5549 031742 001723 BEQ DVINO IF SO SEND ACK 
a 031744 000757 Re DVINS : iF NEITHER SEND ANOTHER ACK 
2326 D0 ERROR AND REPEAT 
$554 031746 012737 016377 006522 DVIN81: MOV #OVEMS, TEMP2 
5555 031754 013737 002660 006524 MOV RHDMCC TEMPS 
$556 031762 013737 002646 006526 MOV HDMCC, TEMPS ;LOAD UP ERRM. AND REG OUlPUTS 
5557 031770 004737 017246 JSR PC,LGDVE LOG TIME OUT WAITING FOR RUN 
5558 031774 005237 006470 INC ERRCNT 
5559 032000 ERRSOFT 10. ,DVEMS,ERR13 
5560 032000 104457 TRAP CSERSOFT 
5561 032002 000012 .word 10 
3368 032004 016377 -wORD OVENS 
5563 032006 016722 -wORD = ERR'S 
5564 032010 005237 006464 INC OPVAR :COUNT HOW MANY TIMES WE DO THIS. 
$302 032014 000137 031232 JMP DVINIT ;TRY ALL OVER AGAIN 
5567 032020 004737 033650 DVINEX: JSR PC, CLRATS CLEAR RTS IF NESC 
5568 032024 042737 173777 006560 BIC #173777, FLAG =: CLEAR FLAG WORD 
5569 Besnze 052737 002000 006560 BIS #INOVR, FLAG SET THE INITT OVER FLAG 
3399 032040 000207 RTS PC RETURN TO CALLER 
5572 
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CVCLHA.P11 25-JUL-80 10:26 DEVICE GET MODEM STATUS SUBROUTINE SEQ 0135 
2303 .SBITL DEVICE GET MODEM STATUS SUBROUTINE 
5575 
5576 
5$77 44 
5578 ; FUNCTIONAL DESCRIPTION: 
Ht ; “DVMODS'' GET MODEM STATUS 
5581 ; IMPLICIT INPUTS: 
5582 : THE BIT POSITION AND AVAILABILITY OF THE MODEM SIGNALS CTS,DSR,...R1,. 
4-44 ; FOUND IN THE DEPENDENT PORTION OF THE GLOBAL EQUATES SECTION. 
5585 : OUTPUTS: 
gene : CURRENT MODEM SIGNAL VALUES IN ‘MODS"’ 
5588 $ 
5589 ; COLL ING SEQUENCE : 
5590 ; PC, DVMODS 
5591 -- 
5592 
5593 032042 017737 157276 007534 DVMODS: MOV @RXCSR,MODS 
5594 032050 042737 000040 007534 BIC #B1TS, MODS CLEAR BIT 5 
5595 032056 032777 000040 157266 BIT #BITS aTxcse :SEe IT TM OR SQ SET 
5596 032064 001403 BEQ DVME x y1f NOT Exit 
5597 032066 052737 000040 007534 BIS at MODS ;1f SET SET Bi’ 5S IN MODS 
$598 032074 042737 106720 007534 DvMEX: BIC #106720, MDS [CLEAR ALL UNUSED BITS 
032102 000207 RTS ;RETURN TO CALLER 





CVCLHA DPV-11 DATA COMM, LINK TEST MACY11 athens” atich bu -80° 10: 29 ~=PAGE 137 
CVCLHA,.P11 25-JUL-80 10:26 VICE QUEUE RECEIVE SPACE SUBROUTINE SEQ 0136 
ei .SBTTL DEVICE QUEUE RECEIVE SPACE SUBROUTINE 
5604 : 
5605 $ "FUNCTIONAL ae tals tae 
5606 é DVR - THIS SUBROUTINE QUEUES THE RECIEVER BUFFER SPACE “J THE 
sdf ; DEVICE, THEN CLEARS THE QRX BIT OF THE FLAG WORD. 
5609 ; INPUTS: 
5610 ? DVRXA = ate’ fe OF RX BUFFER SPACE 
5611 ; DVRCC = BYTE CHAR COUNT OF RX BUFFER 
alt ; QRX FLAG BIT = SET BY CALLING ROUTINE 
5614 : OUTPUTS: 
eu : QRX FLAG BIT = CLEARED BY ROUTINE 
5617 : CALLING SEQUENCE: 
5618 ; JSR PC,DVRxXQ 
5619 oe 
5620 
5621 
5622 032104 DVRxQ 
5623 032104 032737 000004 006560 BIT MORK, FLAG 
5624 032112 001434 BEQ DVREX If NOT RX THEN EXIT 
5625 ELSE QUE RX 
5626 032114 042737 000444 006560 BIC MORK +#BCC+MREM, FLAG CLEAR FLAG FOR RX 
5627 032122 005737 011420 TST RNODE ;1f NON ITEP GO TO 2 
5628 032126 001415 BEQ DVRxK2 
5629 8353 0 O3e 3! 000440 006560 BIS @RXM*MBCC FLAG ;GET JUST THE DATA NO CRC. 
56 0321 013737 006452 011406 MOV DVRXA,RMSGPT 
5631 032144 012737 000072 011410 MOV #72, RMSGCC SET UP Rx TO GET ITEP MSG. 
$632 032152 012737 000070 006454 MOV #70, DVRCC 
a8 Hy 032160 000406 fia DvRx3 
aH ENABLE RX, RX INTERRUPTS, AND DATA SET INTERRUPTS 
5637 032162 012737 002657 011406 DVRX2: MOV #RHDMSG*1, RMSGPT SET UP POINTER 
5¢38 032170 013737 002654 011410 MOV HDMC , RESGC( AND (( 
5639 032176 052777 000160 157140 DvRx3: BIS PRINTEN'RHENA! @DSITEN, aRicsR A 
5640 032204 000207 DVREX: RTS PC SRETURN TO CALLER 
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CVCLHA.P11 25-JUL-80 10:26 DEVICE TRANSMIT AND RECEIVE SUBROUTINE SEQ 0137 
aes .SBITL DEVICE TRANSMIT AND RECEIVE SUBROUTINE 
5644 
5645 : 
5646 : “FUNCTIONAL Rd tl + 
5647 ; DVTXRX=DEVICE TRANSMIT AND RECEIVE ROUTINE 
5648 : THIS CODE QUES THE TRANSMIT BUFFER TO THE DEVICE 
5649 j IF NEEDED. THE CODE THEN WAITS FOR A TX COMPLE, 
5650 ; RX COMPLETE OR BOTH. THE CODE REPORTS A TIME OUT 
5651 ; ERROR IF NO OUTPUT INTERRUPT IS RECIEVED BEFORE 
5652 ; 60 SECONDS. AFTER REPORTING ERROR TIMER IS RE STARTED 
ee? ; AND DEVICE WILL CONTINUE TO WAIT FOR INTERRUPT. 
5655 : INPUTS: 
5656 : “DVTXA'' = ADDRESS OF TRANSMIT MSG. 
5657 : ‘DVTCC'' = BYTE COUNT OF TRANSMIT MSG. 
5658 ; "QTX'’ BIT = SET IF TRANSMIT REQUESTED 
5659 : “ETX'’ BIT = SET IF TRNASMIT EXPECTED 
yee : “ERX'' BIT = SET IF RECIEVE EXPECTED 
5662 OUTPUTS: 
5663 : “DVTXA'' = ADDRESS OF TX MSG. COMPLETED 
5664 : ‘DVTCC’' = BYTE COUNT OF TX MSG. COMPLETED 
5665 : "OTx'’ = SET IF TX COMPLETED 
5666 : “DVRXA'' = ADDRESS OF RX MSG. COMPLETED 
5667 : "DYRCC'' = BYTE COUNT OF RX MSG. COMPLETED 
5668 : "ORx'’ = SET IF RX COMPLETED 
5669 : 
5670 ; 
cert : SUBORDINATE ROUTINES USED: 
gh : "LGDVE'' = LOG DEVICE ERROR TO EVENT LOG 
5675 : CALLING SEQUENCE: 
5676 3 JSR PC ,DVTXRX 
ae é 
5679 032206 032737 000010 006560 DVIXRX: BIT #QTX, FLAG sANY TX TO QUE 
$680 032214 001444 BEQ DvTRS ‘IF NOT GO WAIT FOR OUPUT 
5681 032216 042737 001030 006560 BIC #QTX+¢#TXM*+PAD, FLAG sCLEAR FLAG 
5682 032224 004737 033476 JSR PC,CTSSR :60 SET CTS 
5683 032230 005737 011420 TST RNODE 
5684 032234 001412 BEQ DVTR1 ;1f NON-ITEP GO TO 1 
5685 032236 052737 000020 006560 BIS #@TXM, FLAG SET THE BODY BIT 
5686 032244 013737 006436 011376 MOV DVTXA,MSGPTR 
5687 032252 013737 006440 011400 MOV DVTCC .MSGCC AND SET UP FOR ACTUAL DATA 
5688 032260 000414 Bk DVTR2 
eH ENABLE TX AND TX INTER. 
5691 032262 112737 000201 002645 DvIR1: MOVB #201, HDMSG+1 7SET UP SOH 
5692 032270 ote ee 002645 011376 MOV #HDMSG+1 ,MSGPTR :SET POINTER TO HEADER 
5693 032276 013737 006440 002646 MOV DVTCC, HDMCC 
5694 032 013737 002654 011400 MOV HOMC, msGcC SET CC FOR HEADER 
5695 032312 012737 000177 011402 DvIR2: MOV #177,SYN =SET UP FOR 177 SYNCS. 
5696 032320 052777 000120 157024 BIS ssurGh'oilaten. atxcsR 
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DVTR3: 
DVTRB: 


TOINOT: 


DVTR4: 


DVIREX: 


111 
30A(1052) a5 JUL-80 10:29 PAGE 139 
EVICE TRANSMIT AND RECEIVE SUBROUTINE 
MOV #60., TIMERS :SET TIMER FOR 60 SECS 
BREAK 
TST TIMERS :1S TIMER EXPIRED 
BNE TOINOT 
:LOG ERROR TIME OUT RX OR TX NOT COMPLETED 
MOV #OVEM2, TEMP2 
MOV ARXCSR, TEMPS 
MOV aTXCSR, TEMPS 
JSR PC ,LGDVE 
INC ERRCNT 
ERRSOFT 7,DVEM2,ERR13 
TRAP 
WORD 
“WORD 
~ WORD 
BR DVTR3 :RETURN TO CHECK TIMER 
BIT #QTX, FLAG :1S IT TX COMPL ? 
BEQ DVTRG “BRANCH IF TX NOT DONE. 
JSR PC, CLRRTS 
BIT #ERK, FLAG SARE WE EXPECTING TO RX 
BEQ DVTREX “BRANCH IF NOT. 
BIT WORK. FLAG :1S RX DONE 
BEQ DvtTR& :GO BACK AND TIME IF NOT 
BIT #ETX, FLAG SARE WE EXPECTG TO TX. 
BEQ DVTREX =BRANCH IF NOT. 
BIT #OTX, FLAG :1S IT TX COMPLETED 
BEO DvTRB -GO @ACK AND TIME OUT 
JSR PC, CLRRIS “CLEAR RTS IF NESC. 
RTS PC ZAND EXIT 


CS$BRK 


CSERSOFT 
7? 


DVEM2 
ERRI5 


SEQ 0138 
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CVCLHA.P11 25=JUL=80 10:26 DEVICE TRANSMIT AND RECEIVE SUBROUTINE SEQ 0139 
736 > DEVICE DEPENDENT SUBROUTINES 

5737 
5738 
5739 
5740 
Hoe .SBITL DEVICE INTERRUPT SERVICE ROUTINES 
5743 
5744 
5745 p++ 
5746 > FUNCTIONAL DESCRIPTION: 
5747 : RECEIVER INTERRUPT ROUTINE. WHEN A RX INT. OCCURS 
5748 : THIS ROUTINE DECIDES IF IT IS A RX STATUS,DATA SET 
5749 : CHANGE OR DATA INTERRUPT. IF IT IS A DATA SET CHANGE 
5750 : INTERRUPT IT PUTS THE STATUS IN ‘‘CMODS'’ AND COMPARES 
5751 : THAT STATUS TO THE OLD STATUS IN ‘MODS'’. IF THEY ARE 
5752 : THE SAME THAT MEANS THE INTERRUPT WAS CAUSED BY A GLITCH 
5753 : ON ONE OF THE LINES. IF THEY ARE DIFFERENT THEN A HARD 
5754 ; MODEM ERROR HAS OCCURED. IN ANY EVENT THE MODEM STATUS 
5755 ; CHANGE IS LOGGED. 
5756 : IF A DATA INT. OCCURS THE ROUTINE PUTS THE DATA AWAY 
5757 ; IN A BUFFER POINTED TO BY ‘'RMSGPT’’ THE MSG. COUNT IS 
5758 : DECREMENTED BY ONE BYTE. IF COUNT IS EQUAL TO ZERO AND 
5759 : "BCC’’ BIT AND ‘'RXM'’ BIT IS SET THEN RX IS DISABLED AND 
5760 : “QRX'’ BIT 1S SET. IF COUNT IS ZERO AND ‘BCC'' BIT IS SET 
5761 ; BUT "'RXM'' BIT IS NOT SET THEN MSG COUNT IS SET TO LENGHT 
5762 ; RECVD IN HEADER AND "'RMSGPT'’ 1S SET TO RX BUFFER LOCATION 
5763 ; AND ‘'RXM'’ BIT SET 
5764 ; IF COUNT IS EQUAL TO” ZERO AND "BCC‘' 1S NOT SET THEN 
5765 ; COUNT IS SET TO 2 AND ‘'RMSGPT’' IS SET TO ‘'BCCW'’ AND 
gree ; "BCC’' BIT IS SET. 
5768 : IF A STATUS INTERRUPT OCCURS THEN OVERRUN ERROR BIT IS CHECKED. 
a7e8 ; AN ERROR IS LOGGED AND ‘‘QRx'’ IS SET AND THE RX IS DISABLED. 
5771 : INPUTS: 
5772 : RMSGPT = ADDRESS OF RX BUFFER 
Hh ; RMSCC = COUNT OF DATA TO BE RXED. 
5775 ; SUBORDINATE ROUTINES USED: 
5776 : “LOGMSC' - LOG MODEM STATUS CHANGE 
5777 ; “LGDVE" - LOG DEVICE ERROR 
5778 :-- 
5779 
5780 032472 BGNSRV DVRXI 
5781 032472 DVRXI:: 
5782 032472 017737 156646 011372 MOV @RXCSR,IRXCSR  ;MOV RX CSR TO IMAGE 
5783 032500 032737 000010 006554 BIT #MOCHK PARAM sANY MODEM CHANGES TO REPORT 
5784 032506 001456 BEQ RXIN21 s1F NOT IGNORE DS CHANGE. 
5785 032510 032737 002000 006560 BIT #INOVR,FLAG 71S INIT OVER 
5786 032516 001452 BEQ RXIN21 :NO THEN IGNORE DS CHANGE. 
5787 032520 005737 011372 TST IRXCSR 
5788 032524 100047 BPL RXIN21 :1F DATA SET CHANGE IS NOT SET BR 
$789 032526 013737 011372 011370 MOV IRXCSR,CMODS :MOV THE NEW MODEM STATUS IN 
5790 032534 042737 106760 011370 BIC #106766, CMODS 
5791 032542 032777 000040 156602 BIT #TM aTKxCSR 
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RXIN2: 


GLINC: 
PXINI: 


RXIN21: 


RXING: 


RXIN6: 


25-JUL= 80. 
DEVICE INTERRUPT 


BEQ XIN2 

BIS #TM,CMODS 

MOV CMODS, TEMP 
MOV MODS, TEMP4 
CMP TEMPS , TEMPS 
BEQ GLINC 

INC MHRCNT 

MOV #HRDMSG, TEMP2 
BR RXIN1 


MGLCNT 
MOV #GLMSG,TEMP2 
JSR PC, LOGMSC 


10: 29 


PAGE 
SERVICE ROUTINES 


;1F TEST MODE SET 
;SET IT IN NEW STATUS 


; COMPARE OLD 10 _— 
INC GLITCH COUNT 

; INC HARD COUNT 

:SET UP HARD MESG. 


INC GLITCH COUNT 
;SET UP GLITCH 
;GO0 LOG MODEM STATUS CHANGE 


MOV CMODS , MODS “MOVE CURRENT TO OLD 

“TEST FOR STATUS OR DATA 

BIT #RSTARY!RDATRY, IRXCSR 

BEQ RX INEX IF NEITHER EXIT 

MOV ORDSR, IRDSR 

BIT #RDATRY,IRXCSR ;1S THIS DATA 

BEQ RKIN3 ‘IF NOT GO TO 3 

:GET HERE WITH GOOD DATA 

MOV RMSGPT.R2 

MOVB _—IRDSR, (R2)¢ :STORE DATA AWAY 

MOV R2,RMSGPT “PUT POINTER BACK 

DEC RMSGCC 

BNE RX INEX :GET OUT IF NOT ALL DONE 

BIT #BCC, FLAG [1S THE BCC FLAG ALREADY SE 

BNE RK INS ‘BRANCH IF YES. 

BIT #RERR, IROSR [1S THE ERR CHK BIT SET INDICATING 

‘GOOD BCC. 

BNE RK ING “BRANCH IF GOO 

MOV IRDSR, TEMPS 

MOV IRXCSR, TEMPS 

MOV #DVEM3, TEMP2 

JSR PC ,.LGDVE 

INC ERRCNT 

ERRSOFT 8,DVEM3,ERR13 
TRAP 
WORD 
“WORD 
“WORD 

BR RXINB :DISABLE INTERRUPTS AND EXIT 

BIS #BCC FLAG SET FLAG 

MOV #2. RMSGCC >SET THE COUNT TO 2 

MOV #BCCw,RMSGPT SET POINTER TO BCC WORD 

BR RK INE X 


STATUS CHECK 


CSERSOFT 
8 


DVEM3 
ERR15 


SEQ 0140 
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CVCLHA.P11 25=JUL-80 10:26 DEVICE INTERRUPT SERVICE ROUTINES SEQ 0141 
5848 033024 032737 002000 011372 RXIN3: BIT MRSTARY,IRXCSR ;1S THIS A STATUS INT. 
2843 033032 001454 BEQ RX INEX sEXIT IF NOT 
2) :LOG OVERRUN ERROR 
5853 033034 012737 016333 006522 MOV #OVEMG, TEMP2 
5854 033042 013737 011374 006524 MOV IRDSR, TEMPS 
5855 033050 013737 011372 006526 MOV IRXCSR, TEMPS 
5856 033056 004737 017246 JSR PC ,LGDVE 
5857 033062 005 006470 INC ERRCNT 
5858 033066 ERRSOFT 9,DVEM4,ERR13 
5859 033066 104457 TRAP CSERSOFT 
5860 033070 000011 WORD 9 
5861 033072 016333 «WORD DVEM4 
$862 033074 016722 .WORD ERR13 
3865 033076 000424 BR RXIN7 
$865 033100 032737 000040 006560 RXINS: BIT #RXM FLAG :18 THE RX M BODY BIT SET 
5866 033106 001020 BNE RXIN? +17 YES THEN ALL DONE 
5867 033110 052737 000040 006560 BIS #@RXM, FLAG 
5868 033116 042737 000400 006560 BIC #BCC,FLAG -CLEAR BCC AND SET RXM 
5869 033124 013737 006452 011406 MOV DVRXA,RMSGPT ;MOVE ADDRESS TO POINTER 
5870 033132 013737 002660 011410 MOV RHDMCC,RMSGCC ;MOVE THE CHAR COUNT IN 
5871 033140 013737 002660 006454 MOV RHDMCC ,DVRCC :SET THE CC TO AMOUNT IN HEADER 
2872 033146 000406 BR RX INEX SAND FINISH. 
287% 033150 052737 000004 006560 RXIN7: BIS WORK, FLAG :SET FLAG BIT 


5876 033156 042777 000120 156160 RXIN8: BIC MRINTEN*RXENA,ARXCSR sCLEAR INTAND RX ENABLE 
5878 033164 RXINEX: 


5880 033164 L10020: 
5881 033164 000002 RTI 


eee ee 
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CVCLHA.P11 25-JUL-80 10:26 DEVICE TRANSMIT INTERRUPT ROUTINE SEQ 0142 
abe .SBTTL DEVICE TRANSMIT INTERRUPT ROUTINE 
5884 p++ 
5885 ; FUNCTIONAL DESCRIPTION: 
rt] ; DEVICE TRANSMIT INT. ROUTINE 
5888 ; WHEN A TRANSMIT BUFFER EMPTY CAUSES AN INTERRUPT TO OCCUR 
5889 : THE PROGRAM COMES TO THIS ROUTINE. 
5890 : IF THE SYNC COUNT'’SYNCC'' IS NON ZERO TSOM IS SET 
5891 ; A SYNC CHAR IS LOADED TO TDSR AND THE SYNC COUNT IS 
rt 244 ; DECREMENTED. 
5894 : IF THE SYNC COUNT IS ZERO TSOM AND TEOM ARE RESET 
5895 3 AND THE "'PAD'' BIT IN FLAG WORD IS CHECKED IF IT IS 
5896 ; SET THEN A PAD(377) CHAR IS LOADED TO TDSR AND TX 
1 ad ; INTERRUPT ENABLE IS CLEARD. 
5899 ; IF THE SYNC COUNT IS ZERO AND THE ‘'PAD’' FLAG IS 
5900 : CLEAR THEN A BYTE IS PUT IN TDSR FROM THE ADDRESS 
444 ; IN MSGPTR AND THE MSG COUNT IS DECREMENTED 
5903 ; IF THE MSG COUNT GOES TO ZERO THE ‘'TXM'’ BIT iS 
5904 : CHECKED IF IT IS SET THE 'PAD'' FLAG IS SET 
5905 3 IF IT IS CLEAR THEN IT GETS SET AND MSGPTR IS 
5906 ; LOADED WITH THE ADDRESS OF TXBUFF AND THE MSG 
5907 : COUNT IS LOADED WITH THE COUNT OF THE MSG TO 
5908 ; BE TRANSMITTED. 
5909 : 
5910 > INPUTS: 
5911 : MSGPTR = IS SET TO THE ADDRESS OF THE MSG OR HEADER TO BE TX'D 
5912 ; MSGCC - IS SET TO THE COUNT OF MSG TO BE TX'D 
5913 : OUTPUTS: 
a4 : QTX = THIS BIT IS SET WHEN MSG IS TX'D OK. 
5916 
5917 033166 BGNSRV DVTXI 
5918 033166 DVIXI:: 
5919 033166 005737 011402 TST SYNCC zANY SYNCS TO SEND 
$920 033172 14 BEQ TXIN :1F NOT GO TO 1 
5921 033174 013777 011404 156152 MOV SYNCW,@TDSR sELSE SET TSOM AND SYNC WORD 
§922 033202 005337 011402 DEC SYNCC :DEC SYNC COUNT 
5923 033206 001056 BNE TXINEX ;1F NOT ZERO EXIT 
5924 033210 042777 001400 156136 TXINI: BIC #TEOM'TSOM,aTDSR 
5925 033216 032737 001000 006569 BIT #PAD,FLAG i1S THE PAD SIT SET 
5926 033224 00141 BEQ N :GO TO 2 IF NOT SET 
5927 osesee 012777 000377 156120 MOV #377, aTOSR -LOAD FF TO TX DATA REG 
5928 033234 042777 000100 156110 BIC #TINTEN,aTXCSR CLEAR TX INT ENABLE 
5929 Oeesee 052737 000010 006560 BIS #QTX, FLAG :S€T i ™ COMPLETE IN FLAG 
5930 0332 000435 RR TXINEX sAND E 
5931 033252 013708 011376 TXIN2: MOV MSGPTR,R2 [LOAD +H WITH TX ADDR. 
2938 Baes78 112277 156072 MOVB (R2)+,aTDSR [LOAD DATA BYTE 
593 3326 OeSey 011376 MOV R2,MSGPTR RESTORE POINTER 
5934 O33598 5337 011400 DEC MSGCC sDEC CC 
5935 033 001066 BNE TXINEX 
5936 IG 052777 001000 156052 BIS #TEOM,aTDSR 
5937 033302 032737 000020 006560 BIT aTxn, FLAG 71S THIS THE END OF DATA MSG. 
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CVCLHA.P11 25-JUL=80 10:26 DEVICE TRANSMIT INTERRUPT ROUTINE SEQ 0143 
59358 033310 001012 BNE TXIN3 :1F SO SET THE PAD B 
5939 033312 052737 000020 006560 BIS #TXM, FLAG ‘IF NOT MUST BE END yy ate Aner 
5940 033320 013737 006436 011376 MOV DVTXA,MSGPTR :$0 SET UP MSGPTR FOR MSG 
5941 033326 013737 006440 011400 MOV DVTCC,MSGCC sAND THE CC FOR MSG. 
5942 033334 000403 BR TXINEX : 
ob 033336 052737 001000 006560 TXIN3: BIS #PAD,FLAG ;SET THE PAD BIT 
5945 033344 TXINEX: 
5946 033344 ENDSRV 
5947 033344 L10021: 
5948 033344 000002 RTI 


| 
| 
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RETURN 


Be Se Be Be Oe Oe 


DVIN31: 


DVIN32: 


DVIN35: 
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DEVICE TRANSMIT 


DEVICE T 


ee - DESCRIPTION 


7:29 PAGE 145 


CONTROL MSG SEQ 0144 
RANSMIT CONTROL MSG 


ROUTINE DOES THE FOLLOWING 
QUES A RX SPACE AT RHOMSG+1 


QU 
CH 
IF 
ELS 
IF 
E 


ES A TX MSG FROM HOMSG+1 
ECKS FOR A TIMER EXPIRED 

EXPIRED RETURN TO CALLER 

E CHECK FOR A TX MSG” COMPLETED 

TX COMPLETED CHECK FOR RX COMPLETED 
LSE RECHECK TIMER AND TX COMPLETED UNTIL 


EITHER TX COMPLETE OR TIME OUT 
IF TX oo AND RX NOT COMPLETE THEN 


REQUE T 


MSG. 
ELSE IF “RX COMPLETE RETURN. 


INPUTS: 
TXM 


HDMSG+2 


- SET IN 


FLAG WORD 


- TYPE OF CONTROL MSG.. 


SUBORDINATE ROUTINES USED: 
“CLRRTS'' 
CALLING screws 2 


- CLEAR REQUEST TO SEND IF HALF DUP. 


PC,DVIN31 


RETURN TO CALLER IF SOMETHING RX'D OR TIMER OUT. 


BIC 


MOV 
MOV 


#QRX,FLAG 


#RHDMSG+1 , RMSGPT 
HDMC ,RMSGCC 


#RINTEN!RXENA!DS 
TXMITTER TO SEND 


PC,CTSSR 
#QTX!PAD,FLAG 
#HDMSG+1 ,MSGPTR 
HDMC ,MSGCC 

#8. ,SYNCC 
#TXENA!TINTEN, aT 


sCLEAR RX COMPLE. 

;SET UP POINTER 

sAND CC 

;ENABLE RCVR. 
ITEN,@RXCSR 


;SET RTS 
7 CLEAR TX COMPT FLAG 
:MOVE THE CURRENT POINTER TO MSGPTR. 


7SET UP SYNC COUNT 
XCSR 


;NOW WAIT FOR TIME OUT OR TX COMPLETE 


BREAK 


TIMERS 
DVIN34 
#OTX, FLAG 
DVINSS 
PC, CLRRTS 
#ORX, FLAG 


TRAP C$BRK 
T TIMED OUT 
ES EXIT 


X DONE 
OT GO BACK AND in TIME OuT 
LEAR RTS IF NESC 


$l 
FY 
S TX 
FN 
oc 
If WE RX ANYTHING 


il 
il 
53 
a 
3G 
:D 
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6005 033472 001741 BEQ DVINS2 71F NOT RETRANSMIT LAST 
6006 033474 000207 DVIN34: RTS PC RETURN TO CALLER 





SEQ 0145 


—— EE 
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~SBTTL 


DVTXR3: 


CTSS4: 


CTSS3: 


DVITKR2: 


DEVICE RTS TO CTS DELAY 
DEVICE RTS TO CTS DELAY 


+ 
ocaates DESCRIPTION: 


TSSR=-THIS ROUTINE SETS REQUEST TO y A TO MODEM 
AND CHECKS FOR CLEAR TO SEND TO COME BAC 

IF CTS DOES NOT COME BACK BEFORE TIMER EXPIRES 
AND ERROR IS REPORTED AND WE TRY AGAIN. 

THE ROUTINE IS SKIPPED IF INTERNAL LOOP IS SET. 


; OUTPUTS: 

SUBORDINATE ROUTINES USED: 
“LGDVE" = 

CALLING SEQUENCE: 
JSR 


LOG DEVICE ERROR 
PC,CTSSR 


CMP #1 ,MLTYP 71S THIS TT. LOOP 

BEQ DVTXRO ;BR IF YES 

SET RTS AND WAIT FOR CTS 

BIT #FIRST,FLAG 

BNE C1S$3 ;1F NOT FIRST TIME SKIP DELY 

MOV #0, TEMP 

INC TEMP 

BREAK 
TRAP 

TST TEMP 

BNE CTS$S4 if NOT ZERO GO BACK 

BIS #FIRST,FLAG SET FIRST FLAG, 

BIS MRTS ,ARXCSR ;SET REQUEST TO SEND 

MOV #1000. , TIMER ;SET UP TIMER 

BRE AK 
TRAP 

BIT #CTS,@RXCSR 71S CLEAR TO SEND BACK 

BNE DVTXR1 :BR. IF CTS 1S SET 

TST TIMER sELSE TEST IF TIME EXPIRED 

BNE DVTXR2 BR IF TIME NOT EXPRIED. 

;SET ERROR FOR NO CTS 

MOV #OVEMT , TEMP? 

MOV @RXCSR, TEMPS 

MOV @TXCSR, TEMPS 

JSR PC ,LGDVE 

INC ERRCNT 

ERRSOFT 6,DVEM1,ERR13 
TRAP 
. WORD 
- WORD 
. WORD 


Bk DVTERS ; THEN TRY TO SET RTS AGAIN 


CSBRK 


CS$BRK 


ceeaer 
DVEM1 
ERRIS 


SEQ 0146 








CVCLHA DPV=-11 DATA COMM. LINK TEST 
CVCLHA.P11 25-JuUL-80 10:26 


60t4 033646 
6065 033646 000207 





MACY11 30A(1052) 25"JU 
DEVICE 

DVTKXRi: 

DVTKRO: RTS PC 


E 
L-80 


12 
10:29 PAGE 148 


RTS TO CTS DELAY 


SEQ 0147 





CVCLHA DPV-11 DATA COMM. LINK TEST 


CVCLHA.P11 


033650 


033670 


033672 
033700 


25-JUL=80 10:26 


005737 


001375 


042777 
009207 


-SBTTL 


CLRRIS: 


006552 
002000 006522 
006522 CLRRI: 


0000046 155444 
DVTRS: 


MACY11 30A(1052) 25- juL-80. 


12 
10:29 PAGE 149 


DEVICE CLEAR REQUEST TO SEND 
DEVICE CLEAR REQUEST TO SEND 


-¢? 
; ‘ansocis DESCRIPTION: 


HIS ROUTINE CLEARS REQUEST TO SEND IF 
IN HALF DUPLEX MODE 


; a pernas 


PC,CLRARTS 


FHDPLX 
DVTRS 
#2000, TEMP2 
TEMP2 

CLRRI 

#RTS ,ARXCSR 
PC 


31S THIS FULL DUPLEX 
;BRANCH IF YES 


DELAY A WHILE TO ALLOW CRC 
310 BE TXMITT'D BEFORE YOU 
;CLEAR REQUEST TO SEND 
RETURN TO CALLER 


SEQ 0148 


CVCLHA DPV=11 DATA COMM, LINK TEST 
CVCLHA.P11 25-JUL-80 10:26 


8 
6089 033702 
033702 
rr ad 033702 104401 


MACY11 


G 12 
30A(1052) 25-JuL-80 10:29 PAGE 150 
DEVICE CLEAR REQUEST TO SEND 


«EVEN 
ENDTST 


L10017: 
TRAP 


CSETST 


SEQ 0149 


SA eR AO RET a 


i 
CVCLHA DPV=-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 151 
CVCLHA.P11 25-JUL-80 10:26 DEVICE CLEAR REQUEST TO SEND SEQ 0150 


043 
6094 


CVCLHA Ry -17_ DATA COMM. LINK TEST MACY11 30A(1052) 


CVCLHA.P 


033704 
033704 
033706 


033706 


033712 


033714 


033742 


25-JUL-80 10:26 


000016 


000130 
033742 
000001 


091031 


006130 
034054 
000001 


052506 


HARDWARE PARAMETER CODING SEC 


112 
25-JuL-B0. 10:29 PAGE 152 
TION 


-SBTTL HARDWARE PARAMETER CODING SECTION 


++ 


BGNHRD 


-SBTTL 


GPRML 


~SBTTL 


GPRMA 


GPRMA 


GPRML 


ENDHRD 


-NLIST BEX 


DEVICE INDEPENDENT SECTION 
DPLX,0,1, YES 


DEVICE DEPENDENT SECTION 


CSRADR,2,0,160000,177776, VES 


VECTOR, 4,0, 300,776, VES 


RNODM,14,1,YES 


DEVICE INDEPENDENT QUESTIONS 


046114 0420460 DPLX: -ASCIZ 


/FULL DUPLEX OPERATION : / 


;DEVICE DEPENDENT QUESTION 


THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. 
MACROS ALLOW ie O sapstppicoged TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATO 


THE 
THE 


110022: ~ 


. WORD 
. WORD 
« WORD 


. WORD 
«WORD 
. WORD 
. WORD 


. WORD 
«WORD 
. WORD 
- WORD 


«WORD 
«WORD 
. WORD 


EVEN 


TSCODE 
on 


TSCODE 
CSRADR 
TSLOLIM 
TSHILIM 


TSCODE 
VECTOR 
TSLOLIM 
TSHILIM 


TSCODE 
— 


SEQ 0151 


-WORD L10022-LSHARD/2 
LSOHARD:: 










J 12 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 153 
CVCLHA.P11 25-JUL=80 10:26 DEVICE DEPENDENT SECTION SEQ 0152 


033773 104 
034021 111 
034054 042522 


IZ /DEVICE CSR ADDRESS : / 
IZ /INTERRUPT VECTOR ADDRESS: / 
12 /REMOTE NODE ‘ITEP’: / 


041511 CSRADR: wets 





K 12 
CVCLHA DPV=11 DA‘A COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 154 
CVCLHA.P11 25-JUL-80 10:26 DEVICE DEPENDENT SECTION SEQ 0153 


6147 ;.SBITL SOFTWARE PARAMETER CODING SECTION 


6149 s+ 
; THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 
; THAT ARE USED BY THE SUPERVISOR TO BUILD F-TABLES. THE 
6152 ; MACROS ARE NOT EXECUTED AS MACHINE INSTRUC” IONS BUT ARE 
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
; WITH THE OPERATOR. 


6158 : BGNSFT 


6162 ; ENDSFT 


6170 034100 SPATCH: 
6171 034100 000030 -BLKW 30 


6174 034160 LASTAD 

6175 -FVEN 
6176 034160 000000 -wORD 0 
6177 034162 090000 -wORD 0 
6178 034164 LSLAST:: 

6179 034164 ENDMOD 


6181 000001 END 








CVCLHA DPV-11_ DASA COMM. LINK TEST 
CVCLHA.P11 


026516 


25-JUL-80 10:26 
15468 
4 


4321 
47364 


4736 


4655a 


L 12 

MACY11 30A(1052) 25-JUL-80 10:29 PAGE 156 
CROSS REFERENCE TABLE -- USER SYMBOLS 

4816 5041 

4813 48168 

4817 48268 

47334 

4723 4725 47328 


4748 


4789 


4622a 


475) 4754 47588 


4792 47964@ 


4641 


SEQ 0154 










M12 
CVCLHA DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 157 
CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0155 


ACTTLP 026746 4539 48084 
ACTTRA 026506 4531 47538 
ADDCC § 021104 35618 4436 4478 
ADDC1 = 021200 3563 35788 
ADR = 000020 G 15194 
ALCK 027376 1976 49518 
ALCK1 027504 5006 50154 5061 
ALCK2 027550 5016 50254 5093 
ALCK2A 027770 5058 50634 
ALCK3 030014 5028 5065 50684 
ALCK3A 030106 5075 50814 
ALCK 030120 5082 50844 
ALCKSC 030114 5079 50834 5090 
ALCK4 030142 5069 50884 
ALCK4A 030150 5087 50914 
ALCK4B 030162 92 5094" 
ALCKS 027434 5005# 5083 
ALLTR 027434 4883 4906 4930 5004a 
ASSEMB= 000010 1291 

= 000027 1654# 2117 

006537 19474 2909 5169 

BADCHR= 000051 1672# 2212 
BASM1) 014571 26654 $505 
BASM2 014562 266 3524 
BASMS 014553 26614 3516 
BCC = 000400 16084 5626 5629 5823 5841 5868 
BCCW 011412 22864 5843 
BOCLK 13310 25264 4080 
BITO = 1G 14924 1566 1596 1703 
BITOO = 000001 G 14814 1492 
B1T01 = 000002 G 14804 1491 
BITO2 = 000004 G 14794 1490 
B1T03 = 000010 G 14784 1489 
B1T04 = 000020 G 1477# = §=61488 
B1T0S5 = 000040 G 14768 1487 
B1T06 = 000100 G 14754 1486 
B1T07 = 000200 G 1474# 1485 
B1T08 = 000400 G 14738 1484 
B1109 = 001000 G 1472@ §=1483 
BIT! = 000002 G 14914 1567 1597 1696 1704 
B1T10 = 002000 G 14714 1612 1701 
B1T11 = 004000 G 1470# 1614 1702 
oitie = 010000 G 14694 1687 
BIT15 = 020000 G 14684 1685 
BIT14 = 040000 G 14674 1689 
B1T15 = 100000 G 1466# 1711 1712 
Bite = 000004 G 14904 1568 1598 1688 1705 
BITS = 000010 G 14894 1569 1599 1706 
BIT4 = 000020 G 14884 1570 1604 1697 1707 
BITS = 000040 G 14878 81571 1606 1690 1691 16°38 5594 5595 5597 
Bite = 000100 G 14864 1600 1699 1708 
BIT? = 000200 G 14854 81601 1700 4845 4848 
B1T8 = 000400 G 14844 1608 1709 
B1T9 = 001000 G 1483@ 1610 1636 1710 5504 
BLOBEX 0213512 3622 iM 
BLOBUF 021202 36048 4312 4319 4437 4479 4618 4857 





N 12 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 158 


CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0156 

BLOB 021212 36094 

BLDB2 021254 36174 3624 

BLOBS) 021272 36208 3625 

OF = 000490 G 15234 

BUFEX 013455 25454 4409 4450 

BUFLIM= 001000 1534@ 1891 1892 1893 3562 3574 4406 4467 4611 4853 

BYTBIT 006476 19264 3510 4650* 4654* 

CABLE = 000002 1553@ 5474 

CBLLOP= 000045 16684 2233 

CCURAD 006434 19064 4308* 4316 4477 4482* 4596 

CHECK = 000003 16344 2165 

CLEAR = 000001 16324 2103 4399 4555 

CLIACT 025130 4366 44968 

CLIALN= 0000 16254 2210 

CLIALP= 00 16244 2151 2161 2215 

CLIBCR 011716 23614 4709 

CLIBDL 011611 23498 4821 

CLIBIF= 000003 16214 

CLIBR = 000002 16204 2100 2102 2104 2107 2109 2118 2120 2122 2124 2126 2129 2131 
2146 2148 2158 2166 2170 2172 2177 2181 2184 2191 2193. 2195 2197 
2199 2201 2203 2208 2211 2218 2220 2225 2232 2234 2236 2238 2243 

CLIBRX 011571 23464 3845 

CLIDEC= 000011 1627# 2224 2242 

CLIERM 011474 23344 4372 4 

CLIERR= 000000 16184 2110 2212 

CLIEXI= 000001 - 16198 2094 2096 2098 2137 2139 2248 

CLINBG 011547 23424 3888 

CLINPS 011653 23554 4772 

CLINUF 011524 23384 4381 

CLINUM= 000005 16234 

CLIOCT= 00001 16264 2153 2155 

CLISEO 011763 23684 4679 

CLISPA= 000004 16224 2092 2114 2135 2144 2152 2209 

CLISTR= 000012 16284 2095 2097 2099 2101 2103 2106 2108 2115 2117 2119 21 2123 
2125 2128 2130 2136 2138 2145 2147 2163 2165 2169 2171 2176 2180 
$353 2190 2192 2194 2196 2198 2200 2202 2217 2219 2231 33 2235 

CLITRE 007672 20884 4365 

CLISPM 011466 23334 4359 

CLKBR 006602 19844 4065* 

CLKCSR 19834  3090* 3ille 4036 4054e 4055" 4056 4066" 41968 4275 

CLKEN 006610 19874 3111 4044* 4057" 4066 4275 

CLKHZ 006606 19864 3093 3108 4070 4088 

CLKINT 017042 G 30884 4134 

CLKSET 017016 30434 4043 4053 

CLKVEC 006604 1985@ 40342 4064" 4135 

CLRRTS 033650 5567 5721 5733 6003 60758 

CLRR1 033664 60804 6081 

C 002666 18384 4357 4364 

cmoos 011370 22778 «($789e $790 5793* 5794 5804 

C 005132 18934 4308 4595 

CMPPTR 006426 1903@ 4303¢ 4315 4461* = 6475* 4476 4480" 46583 4584 4593* 4594 4832e 5133 

CMPSEX 030436 5131 52194 

cmPsR 030162 5080 51308 

CmPS1 030322 $162@ 5180 

CmPS2 030326 5165¢@ 


B 13 
CVCLHA DPV=-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 
CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0157 


CMPSS 030214 5136" ©5192 
PSS 03048 5189" 

CMPS5A 030430 5182 «5.1908 

CMPS6 030372 5163 «516751784 

CMPS7 030310 5151 5160" 

CMPTOT 006430 1904# 4320" 4459" 4462 4481" 4586 4590" 4835 

CMSGO = 000020 1647# © 2192 

CMSG1 = 000021 16484 2190 

CMSG2 = 000022 16498 2194 

CMSG3 = 000023 1650# 2196 

CMSG4 = 24 1651# 2200 

CMSGS = 000025 1652# ©2198 

CMSG6 = 000026 16534 © 2202 

CONOTM 006532 1944# 2991 

CONTIN 006534 19458 

CPTR 006506 1934# 3607 -3611® 4311 4315* 434% «4438 476% = 4480 «= 594% = O07" = B55" = BB 2" 
4902" 4927* 4952* 5017 5022* 5034 5084* 5091 5132 5137 5141* 5380* 

CPTRR 006504 1933# 4879" 4905 4928 4954" 5007 5012* 5040" 5045 5054* 5067 5088 5133 
5143 5146* 53348 

CR 015622 27834 ©3229 

CRC = 000040 16634 

cRCB = 000020 1570# 4788 

CSHEXP= 000006 1637# ©2136 

CSHTRN= 000007 16384 © 2138 

CSRADR 033773 6126 61434 

CTOTCC 006432 1905# 4298 4446 4457 4483" 45918 

CTS = 020000 1685# 2010 6046 

CTSSR 033476 5516 5527 5682 5988 60278 

CTSS3 033546 6034 6042" 

CTSS4 033524 6036# 6040 

CURADD 006510 1935# 3609-3614. «3616. 3626* «= 4310* «= 4316* 435% 4440 4477" «= 44824612" 48548 

CURCC 006502 19324 3561 = 3573 576e 3577 3610S 3615. 3626. 4306 = 431B* «= 46144 = 4686" = 46998 
4727* 4730" 4732* 4853 

C$au = 000052 12918 4255 

CSAUTO= 000061 12918 4185 | 

C$BRK = 000022 1291# 5448 5502 5537 5701 5998 6038 6045 

C$BSEG= 000004 12914 

C$B8SUB= 2 12914 

C$CEFG= 000045 12914 

CS$CLCK= 000062 12918 4039 4049 

CSCLEA= 000012 1291# 4212 

C$CLOS= 000035 12914 

C$CLP1= 12914 

CSCVEC= 000036 12914 

CSDCLN= 000044 12914 

C$00DU= 000051 12914 

CSORPT= 000024 12914 

C = 000053 12914 4233 

CSEDIT= 000003 12918 1355 

CSERDF= 000055 12914 

CSERHR= 000056 12914 

CSERRO= 000060 12914 

CSERSF= 000054 12914 : . 

CSERSO= 000057 1291# 5154 5172 5185 5228 5459 5496 5560 5713 5834 5859 6059 

CSESCA= 000010 12914 

C$ESEG= 000005 12914 





SS ES 


C 13 
CVCLHA DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 160 
CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS st 0158 


CSESUB= 000003 12914 

CSETST= 000001 12914 6091 

CSEXIT= 000032 12918 4161 4204 6345 

CSGETB= 000026 12914 

CSGETW= 000027 12918 

CSGMAN= 000043 12914 4068 4355 5312 

CSGPHR= 00004? 1291# 6103 

CSGPLO= 000030 12914 

CSGPRI= 000040 12914 

CSINIT= 000011 12918 4169 

CSINLP= 000020 12914 

CSMANI= 000050 12918 4339 

CSMER = 12914 

CSMSG = 12918 2920 2933 2947 2961 2981 3001 

CSOPEN= 000034 12914 

CSPNTB= 000014 12914 2916 2929 2943 2957 2977 2997 

CSPNTF= 000017 12914 3232 3240 3508 3519 3527 3571 3848 3891 4083 4288 4330 4375 
Stee 4613 4428 4454 4470 4567 4637 4682 4712 4775 4824 5282 5373 

CSPNTS= 000016 12918 3280 3303 3317 3330 3343 3351 3375 3391 3406 3421 3429 3449 
3469 367? 3702 

CSPNTX= 00001 12914 

C$Q10 = 000377 12914 

C$RDBU= 000007 12914 4061 

CSREFG= 000047 12918 4012 4017 4022 4028 

CSRESE= 000033 12918 4201 

CSREVI= 000003 1291# 1354 

CSRFLA= 000021 12918 

CSRPT = 000025 12918 3981 

CSSEFG= 000046 12918 

CSSPRI= 000041 1291#@ 4159 4199 

C$SVEC= 000037 12914 6137 4147 4154 

CSTPRI= 000013 12918 

DATCKB= 000002 15674 3680 4782 4901 5037 5086 5130 5306 5368 

pcD)~=—s- =: 010000 16874 2012 

DOCK = 000014 15864 3186 

DDE = 000022 1591#@ 3194 

DER = 000010 15844 3172 : 

DEV1 007662 20684 3336« 3347 3355* 3357« 3652 4332* 4642* 

DEV2 007664 20694 3337" 3346 3356* 3358 3655 43332 = 6438 

DEV3 007666 20708 3359* 3662 4334e 46448 

DEV4 007670 20714 3360« 3676 3680 3684 3689 4335 4645 

DFPTBL 002130 G 14204 

DIAGMC= 1291 

DIVN91 031662 5534@ 5539 

DLE = 00002 1590#@ 3190 

OLL 030556 1977 52778 

DLLCM 013230 25164 §279 

DLLMOD= 000033 1658@ 2125 

= 000053 16748 2155 

pmPQ = 000054 1675#@ 2157 

pmPS = 00005 16734 2153 4395 4651 

DMSGAD 002172 17384 3618 

DMSGCT 002150 1725@ 3617 

DOW = 000004 1547#@ 4750 5478 

DPLXK 033742 6116 61434 








dD 13 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-vtiL-80 y He — 161 
L 


CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SY SEQ 0159 
pPv = =_-000900 15768 
DPvP1 011366 22674 4845" 4848 $506 

DSITEN= 16984 5639 5984 

DSR = 001000 16864 2011 

DTR = 0000 16964 5482 

DUMEX 021102 3530 35364 
DUMPSR 020746 35014 4397 
D 021040 3511 35224 

DUM2 021062 3521 3529" 

pum 020776 3510#@ 3534 

020752 3502¢@ 3533 

DVEMO 016035 28194 5453 5461 
DVEM1 016114 28284 6053 6061 

DVEM2 016176 28374 #8 5707 $715 

DVEMS 016273 28484 5830 5836 
DVEM4 0163 28554 5853 5861 
DVEMS 016377 28628 $554 5542 
DVEM6 016463 28728 5490 5498 

V zs 12 15854 3177 

DVINEX 032020 5480 5508 5510 5535 5547 55678 

DVINIT 031232 4851 54404 5463 5565 
DVIN1 031314 5446 54674 
DVIN3 031350 5470 54748 
DVIN3SA 031374 5479 54824 5 
DVIN3S1 033346 5518 5543 59784" 
DVIN32 033376 59884 600 
DVIN34 033474 6000 60064 
DVIN3S 033440 5997#@ 6002 
DVIN3S7 031502 5472 5475 55064 
DVIN38 031410 5485@ 5505 
DVIN39 031462 5486 55014 
DVING 031572 55224 
DVING1 031552 5517 5525 
DVINS 031704 5523 554284 5550 
DVIN81 031746 5520 5540 5545 5554a 
DVIN9 031612 5527@ $549 
DVMEX 032074 5596 55984 
DvMODS 032042 3209 55934 
DVRCC 006454 1916@ 50118 5030 53778 5388 5390* 53918 56328 5871* 
DVRCT 006456 19174 4880+ 4953* 5039 5043¢ 5063+ 5064 51348 519i« 
DVREX 032204 5624 56404 
DVRXA 006452 19154 5009* 5029 5375« 5387 5390 5630 5869 
DVRXI 032472 G 4144 57814 
DvRxQ@ 032104 5013 5622a 
DvRX2 032162 5628 56374 
DvRx3 6032176 5633 56394 

DVTCC 006440 19094 5021* 5071 53318 5339 5687 54693 5941 
DVTCT 006442 1910@ 4903" 4926« 49518 5073¢ 5078 5081 
DVTREX 032470 5723 5729 5734a 

DvTR1 Bas 06s 5684 56914 

DvTR2 032312 5688 56954 

DvTRS§ 032326 5680 56984 5717 

DVTRG 032434 5720 57254 

DvTRS 033700 078 60844 

DvVTRB 032334 5700#@ $726 5732 

DvTxXA 006436 19084 50198 5070 53288 5338 5686 5940 


















— 13 
CVCLHA DPV-11 DATA COMM. LIN® TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 162 
CVCLHA,P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0160 


DVIXi 033166 G 4151 59188 
DVTXRX 032206 5025 5336 5385 56798 
DVTXR1 032446 6047 60644 
DVTXR2 033562 60448 49 
DVTXRS 033506 60334 
DVTXRO 033646 6029 60654 
ECHO = 000037 16628 
C = 000004 1568" 3684 4758 4768 4778 5032 
EDDCK 014345 2038 26334 
EDDDE 014460 2041 26478 $174 5187 
EDDER 014330 2036 26308 
EDDLE 014423 2040 26428 5156 
EDDVI § 014375 2037 26384 
EDEOP 014513 2042 26528 
EDMOS 014527 2939 26558 
EDRXC 014302 2035 26268 
EDRXQ 014255 2034 26228 
EDTXC 014226 2033 26184 
EDTXQ 014202 2032 26148 
EFM11 014002 25874 2940 
EFMI3 014131 26034 2954 
EFM2 013705 2576# 2926 
EF .CON= 000036 G 14994 4021 
EF .NEW= 000035 G 1500# 4027 
F.PwR= 000034 G 15014 
EF .RES= 000037 G 14984 4016 
EF .STA= 40 G 1497#@ 4011 
EMSGO 002215 1726 17504 
EMSG1 002216 1727 1752a 
EMSG2 002217 1728 17548 
EMSGS 002220 1729 1756# 
EMSG4 002320 1730 17704 
EMSGS 002412 1731 17844 
EMSG6 002513 1732 17984 
EMSGB 002643 1734 18128 
ENADD 74 1925#@ 3529 4655* 
ENDEVT 020624 3282 3292 3296 3436a 
ENDIT 023442 4025 41318 
ENDPS 030476 5222 52528 
ENDQO = 000017 16464 2207 
= 000024 15924 «©3198 
ERRCNT 006470 19234 3208 3211 4641* 5152¢ 5170* 5183" 5226* 5256 5457* 5494 5558 S711 
5832e 5857* 6057« 
ERR1 016550 G 29064 5175 
ERR10 016640 G 29364 5157 
ERR13 016722 G 29708 5462 5499 5563 5716 5837 5862 6062 
ERR14 016754 G 29898 
ERR2 016612 G 29234 5188 
ERRG 016670 G 29504 5231 
ERX 1 16004 4881 4929 4955 5059 5077 5379 5722 
4904 4955 5060 5076 5333 5345 5728 


—_—_—_— 


F 13 
| CVCLHA DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 163 


CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0161 

EVMOKD 015467 27538 3446 

EVMOST 015547 27624 3466 

EVAR] 015604 2025 27738 

EVARTS 015600 2024 e77ia 

EVMSQD 015610 2026 27758 

EVMTM 015614 2027 2777e 

EVTADD 007626 20494 3321" 3326 3365* 3371 3381* 3387 3396* 3402 

EvTBCT 007 20504 3322* 3325 3366* 3370 3382* 3386 3397* §=3401 

EVTEND 007532 20004 3253 3289 4092 

EVTFO 014632 26724 3300 

EVTF1 014730 26834 3314 

EVTF2 014757 26878 3327 

EVTF3 015031 26954 3340 3418 

EvTF3C 015043 26978 2974 3348 

EVTF3D 015060 27008 2994 

EVTF4 015102 27034 3388 

EVTF4A 015204 27148 3403 

EVTF4B 015302 27264 3372 

EVTF5SA 015361 27358 2913 

EVTLOG 006630 1998 1999# 3257 3274 3287 4089 

EVTLST 007572 20324 3310 

EVTMIN 007622 20478 3308 3313 

EVTPTR 006626 19984 3243 3258" 3273 3294 4090+ 

EVTSEC 007620 2046 3307* 3312 

EVTTCK 007624 20484 3306* 3311 

EVITMP 007632 20514 3335* 3339 3367" 3369 3383* 3385 3398+ 3400 3415" 3417 

ESEND = 002100 12918 

ESLOAD= 0000 12914 1378 

FHDPLKX 006552 19604 4108* 5509 6077 

FIRST = 004000 16144 6033 6041 

FLAG 006560 1970@ 4838 4881* 4904" 4929" 4955* 5005 5015 5027 5059* 5060*  5066* 5068 
5076* 5077* 5085* 5333* 5345" 5379" $467* 5514% 5528* 5534 5568* 5569* 5623 
5626* 5629* 5679 5681* 5685* 5719 5722 5725 5728 5731 5785 5823 5841* 
+3 4 cette 5868* 5874" 5925 5929* 5937 5939* 5943* 5978 5989* 6001 6004 
6 6041* 

+$AU_ = 000015 12918 4243 4254 

FSAUTO= 000020 1291# 4180 4184 

F$BGN = 000040 12914 1293 2906 2923 2936 2950 2970 2989 3006 3088 3970 3990 4006 
rd 2 rt + 4194 4204 4221 4227 4243 4249 4270 4345 5781 5918 6090 
6 61 

FSCLEA= 000007 12918 4194 4211 

$0U = 000016 12918 4221 4232 

FSEND = 000041 12914 1293 2921 2934 2948 2962 2982 3002 3004 3115 3982 4161 4170 
aaae otee 4213 4225 4234 4247 4256 4270 4345 5882 5949 6090 6092 
614 6 

FSHARD= 000004 12914 6108 6140 

$Hw = 000015 12918 1418 1446 

FSINIT= 12918 4006 4168 

FSJMP = 000050 12914 3004 4161 4204 4225 4247 4345 

FSMOD = 12918 1293 6180 

FSMSG = 000011 12918 2906 2919 2923 2932 2936 2946 2950 2960 2970 2980 2989 3000 

FSPROT= 000021 12918 3990 3997 

FSPWR = 000017 12914 

FSRPT = 000012 12918 3970 3980 

F$SEG = 000003 12914 

F$SOFT= 000005 12918 


L 
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FSSRV = 000010 12918 3088 3113 5781 5880 5918 5947 

F$SUB = 000002 12918 

F$Sw = 000014 12918 

FSTEST= 000001 1291#@ 4271 6090 

GETCL 024206 rte! tis 4377 4386 4389 4391 4398 4400 4402 4415 4430 4444 4456 

GETPRA 023256 4031 40978 4106 

GL INC 032620 5797 58014 

GLMSG 015757 28074 5802 

006536 19464 2911 5168* 

GTRA2 023626 42788 

GTRAS 023670 4281 42918 

GTRAG 023676 42968 

GTRAS 024122 4292 43328 5264 5284 

GTREX 027104 4838" 

GTRX2 027202 48534 5263 5347 5403 

GTRY 027054 4348 4394 48314 

GTXRXB 023626 42778 

GSCNTO= 000200 12914 

GSDELM= 000372 12918 

G$D1SP= 000003 12914 

GSEXCP= 000400 12918 

GSHILI= 000002 12914 

GSLOLI= 000001 12914 

G$N"0 = 000000 12914 4358 5315 

GSOFFS= 000400 12914 4071 4358 5315 6115 6125 6130 6135 

GSOFSI= 000376 12914 4071 4358 5315 6115 6125 6130 6135 

GSPRMA= 000001 12918 6125 6130 

GSPRMD= 000002 1291# 4071 4358 5315 

GSPRML= 000000 1291# 6115 6135 

GSRADA= 000140 12918 4358 5315 

GSRADB= 000000 12914 

GSRADD= 000040 12914 4071 

GSRADL= 000120 12918 6115 6135 

GS$RADO= 000020 12918 6125 6130 

GSXFER= 04 12914 

GSYES = 000010 12914 4071 6115 6125 6130 6135 

HDAC 002654 18264 5531 5638 5694 5981 5991 

HDMCC 002646 1820@ 5517* 5529* 5542" 5556 5693« 

HOMSG 002644 181 5513* 5530 5691" 5692 5990 

HELP = 00 la 1291 1305 1396 408 1422 1450 1454 1461 2290 2313 2327 2887 
2889 2904 3015 3972 3976 3978 3998 4008 4164 4182 4196 4207 4223 
4228 4245 4250 4267 4268 4272 6086 609% 6111 6146 6160 6165 6173 

HELPDC= 000000 1# =©1307 1431 1449 1575 1588 1603 1679 1693 2249 2291 2306 2515 
2726 2804 2818 2884 2964 3202 3270 3413 4110 4142 5276 5408 5413 
5575 5603 5644 5738 5743 5883 6120 6143 

HLP = =_: 000005 16364 2093 2095 4388 4571 

HLPEND 003034 18504 4569 

HL PF 012072 23818 4564 

HLPTAB 003016 18434 4561 

HLPO 012014 2373@ 8 4327 

HLP1 012077 1843 23824 

HLP2 012112 1844 23844 

HLP3 012220 1845 23978 

HLP4 012305 1846 24064 

HLP4A = 0012364 1847 24148 
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HLPS 012442 1848 24228 
HLP6 012532 1849 24328 
= 100000 G 15304 
HRDOMSG 016005 281148 5799 
HSMSE 002653 18248 
1BE = 010000 G 15278 
1pU == 000040 G 15204 
IER = 020000 G 15284 
ININT = 000001 1596" 
INOVR = 002000 16124 5569 5785 
INTPRI 011362 22648 4128 
INVEC 011356 22628 8 4125* 4145 
IRDSR 011374 2279# §$810* 5817 5825 5828 5854 
IRXCSR 011372 22788 5503* 5504 5782* 5787 5789 5808 5811 5829 5848 5855 
ISR = 000100 G 15214 
IXE = 004000 G 15268 
ISAU = 000041 12918 42634 42564 
ISAUTO= 000041 12918 4180 41864 
ISCLN = 000041 12918 41944 4204 42134 
I1s0u = 000041 1291#@ 42218 42348 
ISHRD = 000041 61084 61424 
ISINIT= 000041 12914 40064 4161 41704 
000041 12918 12934 61804 
ISMSG = 000041 12914 29064 29214 29234 29348 29368 29488 29504 29628 29708 29824 29898 30024 
I1SPROT= 000040 12914 3990" 
ISPTAB= 000041 12914 
SPwR = 000041 12918 
ISRPT = 000041 12914 39704 39824 
ISSEG = 000041 12914 4270 
ISSETU= 000041 12914 
ISSRV = 000041 12914 30884 31154 57814 58828 59184 59498 
1$SUB = 000041 12914 4270 
ISTST = 000041 12918 42708 4345 60904 60924 
JSJMP = 000167 12914 3004 4225 4247 
KEYWD1 003010 18394 4388 4390 4392 4395 4399 4401 4403 4555 4558 4571* 4574 4578 
4588 4602 4651* 4661* 4664* 
LCLKEN= 000100 15604 4044 
LGDVE 017246 31704 5456 5493 5557 5710 5831 5856 6056 
LIS = 000006 1549# 4747 5346 
LISCK 031022 1979 53684 
LISCKA 031050 5375a 399 5401 
LISMOD= 32 16574 2123 
LISP 013154 24994 5370 
LMDLOP= 000046 16694 2235 
LNCNT 006462 1920#@ 3224 3226* 3235* 
LOE = 040000 G 15294 
LOGCMD 017366 3192¢@ 5189 
Loccm. 017350 31884 5158 
LOGCMP 017332 31848 5148 
LOGDVI 017264 3175@ 4850 
LOGEOP 017404 31964 5257 
LOGE X 017674 3213 32608 
LOGMSC 017422 3202# 5803 
LOGRXC 017236 31678 85031 5389 
LOGRKQ 017220 31628 5014 5383 
LOGS1 017440 3155 3160 3165 3169 32088 
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CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 166 
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LOGSe 017666 3254 32588 
LOGS 017472 3173 3182 3187 3191 3195 3199 3205 32178 
LOGS4 017546 3225 22348 
LOoGSS § 017572 3219 3221 324284 
LOGTXC 017202 3157#@ $072 5340 
LOGTXQ 017164 3152a@ 5023 5332 
LOGUNT 006540 19514 4095* 4097* 4098 4102 
LooPS 003102 1872@ 3661 
LOT = 000010 G 15184 
LPO 013036 1872 24758 3660 
LP0O 013037 24768 3657 
LPI 013046 1873 24788 
LP2 013057 1874 24808 
LP3 013065 1875 24828 
LPS 013100 1876 24848 
iSACP 002110 G 13854 
LSAPT 002036 G 13438 
LSAU 023612 G 1370 42434 
LSAUT 002070 G 13694 
LSAUTO 023560 G 1386 41804 
LSCCP «002106 G 13834 
LSCLEA 023562 G 1384 41944 
002032 G 13394 
PO 002011 G 13214 
LSDESC 011432 G 1376 23188 
LSDESP 002076 G 1375a 
LSDEVP 002060 G 13614 
LSOISP 002124 G 1346 1405@ 
L$oLY 002116 G 13914 
LSOTP 002040 G 1345¢ 
LSDTYP 002034 G 13418 
023604 G 1372 42214 
L$o0uT 002072 G 13714 
LSOVTY 011422 G 1362 25084 
LSEF 002052 G 13564 
LSENVI 002044 G 13498 
LSETP 002102 G 13798 
LSEXP1 002046 G 13514 
LSEXP4 002064 G 13654 
LSEXPS 002 G 13674 
LSHARD 033706 G 1328 6108 61094 
LSHIME 002120 G 13934 
LSHPCP 002016 G 13278 
LSHPTP 002022 G 13314 
002130 G 1332 1418 14198 
LSICP 002104 G 13814 
LSINIT 022734 G 1382 40064 
LSLADP 002026 G 1335¢ 
LSLAST 034164 G 1336 61784 
LSLOAD 002100 G 13774 
LSLUN 002074 G 13734 
LSMREV 002050 G 13534 
L 002000 G 13104 
LSPRIO 002042 G 13478 
LSPROT 022726 G 1388 39908 
LSPRT 002112 G 1387¢@ 
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LSREFP 002062 G 13634 
LSREV 002010 G 13198 
LSRPT 022720 G 1364 29708 
L$SPC_ 002056 G 13598 
LSSPCP 002020 G 13298 
LSSPTP 002024 G 13334 
L$STA_ 002030 G 13374 
LSTEST 002114 G 13898 
LSTIML 002014 G 1325¢ 
LSUNIT 002012 G 13234 4098 
L10000 002150 1418 14464 
L10001 016610 29198 
L10002 016636 29328 
L10003 016666 29468 
L10004 016720 29604 
L10005 016752 29804 
L10006 017010 30004 3005 
110007 017162 31138 
L10010 022724 39808 
L10012 023556 4162 41684 
L10013 023560 41848 
L10014 023602 4205 42114 
L10015 023610 4226 4232" 
L10016 023616 4248 42544 
L10017 033702 4346 60904 
L10020 033164 58804 
L10021 033344 59478 
L10022 033742 610 61414 
013172 2502 4072 
MCREP 030452 5220 5226" 
MGLCNT 011414 22878 952 4842* 5219 5232* 5801* 
MHRCNT 011416 22884 2953 4843" 5221 5233* 5798* 
MLTYP 006550 1957#@ 3179 4322* 4333 4347* 4643 4741* 4760" 4806" 4808 4810" 4812" 48148 
4819* 5469 5474 6027 
MOBITE 007554 20174 3463 
MOBITS 7536 20108 3451 
MOCHK = 000010 15694 3689 4791 5783 
MODE 006562 1973@ 4860 
MODES 003064 18644 3654 
MODLOC= 000003 15544 
MODREM= 000004 15554 
MODS 007534 20044 3215 5593" 5594* 5597* 5598" 5795 5804* 
MODTYP 006546 1954# 3178 4321* 4332 4642 4736e 47392 4764e 4747" 4750" 4753* 4756* 4769 


5074 $346* 5402* 5478 
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CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE <== USER SY SEQ 0166 

MSGCL =—.011400 22818 5531" S687" 5694* 5934* 5941" 59918 

MSGLIM= 000017 1536# 1894 1895 1896 4421 4463 

MSGPTR 011376 22808 5530" 5686*  5692* 5931 5933* 5940" 5990¢ 

MSGTRN 013473 25484 4410 4425 4451 4467 

MSGTRU 013524 25534 3568 

MSGTYP 006500 inten 3612 4305* 4317* 4613* 4692* 47168 47188 47208 4722 4724 4726* 47298 
® 

MSGO 002214 1726 1739 17498 

MSGOC 002150 17268 

MSG 002215 1727 1740 17514 

MSGIC 002152 17278 

MSG2 002216 1728 1741 17538 

MSG2C 002154 17284 

$G3 002217 1729 1742 1755a 

MSG3C = 002156 17298 

MSG4 002220 1730 1743 1757# 

MSG4C 002160 17304 

MSGS 002320 1731 1744 17714 

MSGSC 002162 17314 4306 4318 4614 4727 

MSG6 002412 1732 1745 17854 

MSG6C 002164 1732@ §©4730 

MSG8 002642 1734 1747 18118 

MSG8C 002170 1734@ 

NEW 023250 4030 4095# 4099 

NO 000036 16614 2163 4763 4766 4797 

NOCLK 013334 25308 4285 

NODO 007672 20924 

NOD1 007676 20938 

nOD10 007752 21004 

N0OD100 010610 21724 

NOD101 010614 21768 

NOD102 010630 21778 

NOD103 010634 21808 

NOD104 010650 21818 

NOD105 010654 21838 

NOD106 010670 21848 

NOD107 010674 21874 

NOD11 007756 21014 

nOD110 010700 21908 

NOD111 010714 21918 

NOD112 010720 21928 

NOD1135 010736 21938 

NOD114 010742 21948 

NOD115 010756 21954 

NOD116 010762 21968 

NOD117 010776 21978 

NOD12 007772 21024 

wOD120 011002 21984 

NOD121 011016 21998 

wOD122 011022 22004 

wOD123 011036 22014 

wOD126 (11042 22028 

woD125 011056 22034 

NOD126 011062 22064 

wOD127 011066 22078 

NOD 1 007776 21034 


| 
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29 ~PAGE 170 

CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0168 
wod4e 010314 $1398 
NOD47 010336 1374 
NODS 00772¢ 20974 
NodDSO 8 ©.010340 21384 
noes 010364 21394 
NODS 010366 21448 
NODS 010372 21454 
wodS4 010412 214684 
NODSS 010416 21478 
NODS6 010440 21488 
NODS7 010444 21514 
NOD6 007736 20984 
NOD60 010450 21524 
NOD61 010454 21534 
NOD62 010460 21548 
NOD63 010464 21554 

010470 21564 
NOD65 010474 21578 
NOD66 010500 21584 
NOD67 010504 21614 
NOD7 007740 20994 
wOD70 010510 21624 
NOD71 010514 21634 
NOD72 010526 21644 
wod73 010532 21654 
NOD74 010546 21664 
woD75 010552 21694 
NOD7 010570 21704 
NOD7 010574 21714 
NONE = 000000 15514 
NOTNUF= 000050 16714 2101 2104 2105 2115 2154 2156 2162 2216 
NULEVT 014577 26674 3277 
NULL = 16314 
NUM = =_:« 000014 16434 2224 
ni0$ 007676 209284 
n100$ 010310 104 2107 21348 
N102$ 010314 21354 
N104$ 010340 2136 21378 
N110$8 010366 2109 21434 
w111$ 010372 21444 
N112$ 010416 2145 21468 
N114$ 010510 21614 
wii5S 010504 2118 2120 2122 2124 2126 2129 2131 21604 2166 2170 2172 2181 2232 

2234 2236 2238 2243 

N116$ 010526 21634 
N117$ 010552 2164 2165 21684 
w118$ 010574 2169 21704 
N120$ 010674 2146 2148 21864 
wi21$ 011114 2191 2193 2195 2197 2199 2201 2203 2208 22148 2226 
N122$8 011144 2217 22184 
wi23$ 011120 22154 
N125$ 011342 2154 2156 2158 2162 2216 22478 
ui ees 011164 2218 2220 22228 
&y 010614 2171 1754 
N131$ 010654 $190 1824 
N132$ 010634 176 1794 
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CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0169 | 
N1408 011200 2184 22278 
NIGI$ 011204 22308 | 
N1G28 011232 2231 «22328 
NIG3$ 011252 223320348 
N144$ 011300 2235 49.2236" 
N1S0$ 011326 2177 22408 
N208 010016 2103 21048 . 
N25$ 010040 2106 = 21078 
N30$ 010056 5105 3108-2109) 2114 21182116 2127-2130 2135) 2138) 2144 = 2147 2153 
5155 21572183. 2187 2206 = 2219) 2223S 2224 = 2228) 2237 2241 2242 
0$ 007776 2101 21020 
N42$ 0077 2093 20944 
NG3S 007722 2095 20968 
N45$ 007740 2097 2098 
N4G6$ 007756 2099 21008 
NSO$ 010444 2102-21508 
N51$ 010450 21518 
N52$ 010454 21528 
0$ 010700 21898 
No1$ 010720 2190 21914 
N62$ 010742 2192 21934 
N63$ 010762 2194 21958 
011002 2196 21978 
N6S$ 011022 2198 21998 
N66$ 011042 2200 22014 
NO7$ 011062 2202 22054 
N70$ 011066 2206# ©2211 
N71$ 011076 2207 22084 
N72$ 011102 22098 
N73$ 019112 2210 22118 
010060 2100-21138 
NB1$ 010064 21148 
NB2$ 010126 211721188 
N83$ 010150 2119 21208 
NBS = 010172 2121 21228 
N85$ 010214 2123 124m 
NB6S 010244 2125 21268 
NB7$ 010272 2128 9.21298 
OFSET 006514 1937#@ 2912 S161" «5178s 
OPBFPT 002514 1804@ 5393 | 
2520 1746 1805@ 470253075314 S822 532853289 5341 53435375) «5376 5398 
OPCNT 002166 17338 4700" 5326" 5330 5331 
OPEND 002642 1806@ 5309 
mm 013165 25018 5316 
RMSG= 000015 16448 2206 
OPTYP 011364 22658 41298 | 
006464 19218 4839 5254 55648 | 
OTINT = 2 15978 | 
OUTVEC 011360 22638 «41268 4127" «4152 | 
OSAPTS= 000000 12918 1337 
o$au = 000001 12918 1304# ©1369 | 
OSBGNR= 900001 12918 13048 = 1363 
OSBGNS= 12918 1329 
o$ou = 000001 12918 «13068 = 1371 
OSERRT= 000000 13918 1379 


a ee 
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CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0170 

OSGNSW= 000000 12914 1333 

OSPOIN= 000001 12914 13044 1395 

O$SETU= 000000 12914 1323 6176 

PAD = 001000 16104 5528 5681 5925 5943 5989 

PARAM 006554 19618 3181 3220 4324* 4335 4645 4758* 4768% 4778* 4796* 4799* 4901* 5032 
5037 5086 5130 5306* 5368* 5783 

PAS = 000002 15458 4739 4769 5057 5074 

PASC = 00004 16654 2242 

PASMOD= 000030 1655# 2119 

PCADD 00654 19524 

PCK 013127 24904 3679 

PCLKCT= 001600 15624 4055 

PCLKEN= 000111 15614 4057 

PCPM 013750 25824 

PCSAR 011346 2256# 4116* 4i17* 5506+ 

PEC 013137 24938 683 

PLCK 27342 1975 4925¢ 

PLCK2 027342 49268 

PLCK3 027356 49284 

PMS 013146 24954 3688 

PNCK 013125 24894 3682 

PNEC 013135 24924 3686 

PNMS 013144 24944 3691 

PNST 013114 24864 3678 

PNT = 001000 G 15244 

PRI = 002000 G 15254 

PRIOO = 000000 G 1513#@ 4158 

PRIO1 = 000040 G 15124 

PRIO2 = 000100 G 15114 

PRIO3S = 000140 G 1510# 

PRIO4 = 000200 G 1509" 4143 4150 

PRIOS = 000240 G 15084 

PRI06 = 000300 G 1507# 

PRIO7 = 000340 G 1348 1506# 4198 

PRNT = 000055 16764 2097 4390 4574 

PROTO = 000041 16648 

PROTOB= 000040 1571# 4794 

PSCNT 006466 1922# 4840" 5252* 5255 

PS! 013116 24878 3675 

PTREND 006416 18974 

PTRTAB 006132 18944 4299 4419 4599 4606 4831 

PTR13 006226 18954 4303 4461 4583 4593 4832 

PTR23 006322 18964 4833 

PSACT 003120 18824 3771 4366* 

PSBUFA 003114 18804 3726 4364+ 

PSCNT 003122 18834 3868* 3875 3937" 3944* 3949 

PSEXIT 021746 3729 37644 3788 3793 

P$GDBD 003131 18878 3786* 3791* 3799 3850* 3893* 4352 4369 4684" 4777+ 4818+ 

PSNNUF 003150 18864 4353* 4378 4552* 4579 4587* 4601* 4656* 4733* 4740* 4759* 48268 

PSNUM = 003124 Hey i383 3866* 3868 3869* 3871* 3875" 3877* 3883" 4649 4655 4676 4686 

PSRADX 003126 1885#@ 3823* 3826* 3833+ 3840 3873 3881 

PSTREE 003116 18814 3727 4365* 

PSTRV 021630 37254 4368 

PSTRS 021640 37284 863737 3757 3762 

ecoPy = 000013 16424 2219 4671 








CVCLHA DPV-11 DATA COMM. LINK TEST 
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CROSS REFERENCE TABLE <= USER SYMBOLS SEQ 0171 
rhs ¥4 4955 5005 5027 5059 5066 5077 5379 5623 5626 5725 
4955 5015 5060 5068 5076 5085 5333 5345 5528 5534 5679 
5731 5929 5989 6001 
4668e 4671% 4674 4763* 6766 4779* 4797 4800* 

4484* 64665* 4688 4689+ 

5811 

4119* 5810 

4575 

4033* 4291 

4058 4077 40868 

5524 5546 5548 5555 5870 5871 
5980 

5876 5984 

5636* 5821* 5842* 5870*  5981* 

5637* 5816 5818* 5843 5869*  5980* 
4846 550: 5627 5683 

4323" 4334 4342 4580* 4644 4803* 5259 5261* 
3353 3364 3378 3393 3409 3433 
3432 3445¢ 

2057 2058 33214 

3295 3298" 

5848 

6042 6083 

4392 4578 

3218 

5445 5454 5482* 5491 5503 5593 5639" 5708 5782 5876" 5984* 
6054 6083* 

5876 5984 

5844 5849 5872 58788 

5788 58084 








D 14 
CVCLHA DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL=80 10:29 PAGE 174 


CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0172 

RXINé 033000 5827 58418 

RXIN7 033150 5863 5866 SB74a 

RXIN® 033156 5839 58764 

RXM = 000040 16068 5514 5626 5629 5865 5867 

RXMTOT 60 19184 4835" 4880 4953 5134 

RXONLY 027250 1973 48768 

RKXON2 027250 48798 

RXPTR 006422 19014 4301" 4833" 4855 4879 4928 4954 5040 5132 

RxQ = 000004 15824 3164 

SCM 015671 27928 3185 

SCMD 015724 27988 3193 

SCAL 015713 27964 3189 

SOVE 015660 27904 3171 

SOvVI 015702 27948 3176 

SEOP 015735 28004 3197 

SETEXP= 010 16398 2145 4403 4661 

SETTRN= 11 16404 2147 4664 

SHFO 013607 25628 3668 

SHF 1 013645 25698 369 

SHMSG 012631 26658 4634 

SHOW = 000002 16334 2106 4401 4558 4588 4602 

SHTAB 003054 18584 4622 4628 

SHTEND 00 18614 4625 

SHTYPO 012665 1851 24504 

SHTYP1 012674 1851 24528 

SHTYP2 012701 1851 24534 

SHTYP3 012706 1851 24548 

SHTYP4 012713 1851 24554 

SHTYPS 012721 1851 2457" 

SHTYP6 012726 1851 24584 

SHTYP7 012734 1851 24598 

SHTYTB 003034 1851# 4633 

SHWOP 021326 3362 3652H 864336 6646 

SIZE = 000012 16418 2217 4668 4674 

SMSC 015746 28044 3203 

$QD = 0 16904 2015 

SRxXQ 015647 27884 3163 

STADD 72 19244 3501 4649* 

START 023010 4014 40334 

STATB = 000001 15664 3220 3676 4785 

STATUS= 16 16454 2169 

STXC 015636 27864 3158 

STxQ 015625 27844 8 3153 

SVCGBL= 000000 12914 1319 1319 1321 1323 1325 1327 1329 1331 1333 1335 1337 1339 
1341 1343 1345 1347 1349 1351 1353 1356 1359 1361 1363 1365 1367 
1369 1371 1373 1375 1377 1379 1381 1383 1385 1387 1389 1391 1393 
1405 1419 1420 2308 2318 2906 2923 2936 2950 2970 2989 3088 3970 
3990 4006 4180 4194 4221 4243 5781 5918 6109 61784 6179 

SVCINS= 000001 1291#@ 1311 1312 1313 1314 1315 1316 1317 1318 1320 1322 1324 1326 
1328 1330 1332 1334 1336 1338 1340 1342 1344 1346 1348 1350 1352 
1354 1355 1357 1358 1360 1362 1364 1366 1368 1370 1372 1374 1376 
1378 1380 1382 1384 1386 1388 1390 1392 1394 1404 1406 1418 2309 
2311 2319 2324 2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 
2920 2925 2926 2927 2928 2929 2930 2933 2938 2939 2940 2941 2942 
2943 2944 2947 2952 2953 2954 2955 2956 2957 2958 2961 2972 2973 
297% 2975 2976 2977 2978 2981 299" 2992 2993 2994 2995 2996 2997 


E 14 
CVCLHA DPv-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 175 


CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0173 
2998 3001 3004 3005 3114 3229 3230 3231 3232 3233 3237 3238 3239 
3240 3241 3277 #8 3979 3280 $f] 3300 3301 3302 3303 3304 3310 
3311 3312 3313 3314 3315 3316 3317 3318 3325 3326 3327 3328 3329 
3330 3331 3339 3340 3341 3342 3343 3344 3346 3347 3348 3349 3350 
3351 3352 3369 3370 3371 3372 3373 3374 3375 3376 3585 3386 3387 
3388 3389 3390 3391 3392 3400 3401 3402 3403 3404 3405 3406 3407 
3417 3418 3419 3420 3421 3422 3426 3427 3428 3429 3430 3446 3447 
3448 3449 3450 3466 3467 3468 3469 3470 3504 3505 3506 3507 3508 
3509 3514 3515 3516 3517 3518 3519 3520 3523 3524 3525 3526 352 
3528 3568 3569 3570 3571 3572 3664 3665 3666 3667 3668 3669 3670 
| 3671 3672 3695 3696 3697 3698 3699 3700 3701 3702 3703 3845 3846 
3847 3848 3849 3888 3889 3890 3891 3892 3981 4011 4012 4014 4016 
! 4017 4019 4021 4022 4024 4027 4028 4030 4038 4039 4040 4042 4048 
4049 4050 4052 4061 4063 4068 4069 4070 4071 4072 4073 4074 4075 
4080 4081 4082 4083 4084 4102 4103 4104 4106 4133 4134 4135 4136 
4137 4138 4143 4144 4145 4146 4147 4148 4150 4151 4152 4153 4154 
4155 4158 4159 4161 4162 4169 4185 4198 4199 4201 4204 4205 4212 
4225 4226 4233 4247 4248 4255 4285 4286 4287 4288 4289 4327 4328 
4329 4330 4331 4339 4341 4345 4346 4355 4356 4357 4358 4359 4360 





4682 4683 4709 4710 4711 4712 4713 4772 773 4774 4775 4776 4821 
4822 4823 4824 4825 5154 5155 5156 5157 5172 5173 5174 5175 5185 
5186 5187 5188 5228 5229 5230 5231 5279 5280 5281 5282 5283 5312 
5313 5314 5315 5316 5317 5318 5319 5370 5371 5372 5373 5374 5393 
5394 5395 5396 5397 5448 5459 5460 5461 5462 5496 5497 5498 5499 
5502 5537 5560 5561 5562 5563 5701 5713 5714 5715 5716 5834 5835 
5836 5837 5859 5860 5861 5862 5881 5948 5998 6038 6045 6059 6060 
6061 6062 6091 6108 6115 6116 6117 6125 6126 6127 6128 6130 6131 
6132 6133 6135 6136 6137 6140 6175 6176 6177 

SVCSUB= 000001 12918 

SVCTAG= 000001 12918 1446 2919 2932 2946 2960 2980 3000 3113 3980 4076 4168 4184 
4211 4232 4254 4363 5320 5880 5947 6090 6141 

SVCTST= 000001 12914 4270 

SYN = 000226 17134 

SYNCC 011402 22824 5532* 5695* 5919 5922* 5992* 

SYNCW 011404 22834 4844" 4849" 5921 

S$LSYM= 010000 1291@ 1447# 2920 29334 2947# 29618 29818 30018 31148 39818 4069 4076 4077# 
41698 4185@ 4212# 42334 42558 4356 4363 43648 5313 5320 53218# 58818 59488 


7e = =3186* «931908 «= 3194e = 33198 = 45204" = 45.218 
74e 3575* 3576 3614" 3615" 3621 weet" 


3 
3244 3245 
693" 4694* 4698 4701 5046* 5047* 


3667 3675« 





CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0174 
6035* 6036" 6039 

TEMP1 006520 1939@ =. 3153e «33158 «= 3163e ) —3171e «= 3176e «= 31 85*® «=. 33189" «= 33193" §8=60197* 898203" 83237 3661¢ 
3665 3679* 3682* 3697 

TEMP2 006522 19408 3178* 31792 3250 3617* 3619* 3623 3662* 3664 3683"  3686* 3696 5008¢ 
5018* 5029* 5035 5049* 5050 5070* 5138 5255* 53298 5338  5376* 5387* 54538 
5$490* §$554* 5707" 5799%  5802* 5830* 5853*  6053* 6079"  6080* 

TEMPS 006524 19414 2938 2973 2993 3180* 3251 3657* 3660* 3666 5010*  5020* 5030* 5036 
5047 5048 5049 5071* 5140* 5150 $256 $330e 5339 5378 5388* 5454 54918 
5555* 5708* 5794* 5796 5828 5854* 6054* 

TEMPG 006526 19428 2925 2972 2992 3181« 3215 3252 5147* 5160* 5165* 5166 5181 5254 
5455* 5492* 5556* 5709* 5795* 5796 5829* 5855*  6055* 

TEMPS 006530 19438 3688« 3691« 3695 

TEOM = 001000 1710# 5924 5936 

TERR = 100000 17114 

TIMERS 006624 1995@ 3106 3110* 5515* 5519 5538 5544 5698* 5702 5999 

TIMER! 006620 1993#@ 3100 3102" 4279* 4280 5484* 5485 6043* 6048 

TIMER2 006622 19944 3103 3105* 

TIMMIN 006612 1989#@ 3097" 3249 4086* 

TIMSEC 006614 1990#  3094* 3095 3098« 3248 4087+ 

TIMTCK 006616 19914 3091* 3093 3108 3246 4088+ 

TINTEN= 000100 1708@ 5533 5696 5928 5993 

™ = 000040 16914 2016 5791 5793 

TOINOT 032410 5703 57198 

TOTCC 512 19364 3561* 3562 3573* 3575 3577* 6296* 4405* 4406 4439 6446% 4447 4483 

TRA = 000001 15444 6753 

TRAMOD= 0034 16594 2128 

TRVACT 021750 3758 37698 3785 3790 3795 3798 3818 3884 3907 3928 3952 

TRVALN 022542 3747 39114 

TRVALP 022476 3746 3897" 

TRVBIF 022054 3743 37984 

TRVBR 022044 3742 37954 

TRVBRC 021770 3756 37764 3796 3801 3820 3894 3909 3930 3956 

TRVDEC 022150 3749 38234 

TRVERR 006 3740 37854 

TRVEXI 022026 3741 37904 

TRVNMA 022170 3824 38274 

TRYNOB 022000 378148 3802 3819 3885 3908 3929 

TRVNUM 022162 3745 38268 

TRVOCT 022162 3748 3825" 

TRVSPA 022076 3744 38044 

TRVSTR 022630 3750 3934a 

TSOM = 00 1709#@ 5924 

me 1 15524 6347 5469 

TTLL = 000010 17064 5468 5471 

TTLLOP= 000044 16674 2231 

TTOTCC 006446 1912#@ 4297" 4405 4416 4439* 4605* 

TXACT = 000002 17044 

TxBUF «©. 003132 18914 4307 4608 

™C Oo = 2 15814@ 3159 

TxCSR 011352 22584 41208 4121% 5443* 5455 5468* 5471 5492 5533* 5595 5696* 5709 5791 
5928* 5993* 6055 

TXENA = 000020 17074 5533 5696 5993 

TXINEX 033344 5923 5930 5935 5942 59454 

TXIN] 033210 5920 59244 

TXIN2 033252 5926 59314 

TXINS «033336 5938 59434 
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CVCLHA DPV=-11 DATA COMM. LINK TEST MACY11 30A(1052) 25-JUL-80 10:29 PAGE 177 

CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0175 

TxM == 000020 16046# 5514 5681 5685 5937 5939 

TXMTOT 006444 1911# = =4313% = =4418* 4420 4441* 4600 4604* 4903 4926 4951 

TXONLY 027302 1974 4901" 

TXON2 027310 49024 

TXPTR 006424 1902@ 4300* 4311 419% 4433* 4434 4438* 4606* 4607 4831* 4302 4927 4952 

TxQ == 000000 15808 3154 

TSARGC= 000001 13118 801312 13134 13146 13158 13164 29084 2917 29254 2930 29384 2944 29528 
2958 29724 = §=2978 29918 2998 32298 3233 32378 3241 32778 3281 33008 3304 
3310# 3318 33258 3331 33398 334 33464 3352 33694 3376 33854 3392 34008 
3407 3417# 3422 34264 3430 34468 3450 34664 3470 35044 350 35144 5 
3523#@ 3528 35684 3572 36648 3672 36954 3703 38454 3849 38884 3892 40804 
4084 42854 4289 43274 =4331 43728 4376 43818 44098 414 44248 4429 
44504 4455 44664 4471 45634 68 46328 4638 46798 4683 47098 4713 47728 
4776 48214 4825 5279" 5283 53708 5374 53934 5397 

TSCODE= 006130 4071# 43584 53154 61154 6125# 6130 61354 

TSERRN= 000006 12918 5155#@ 51734 51864 52298 5460# 54978 55618 57144 58354 58608 60608 

TSEXCP= 000000 40714 4076 43584 4363 5315# 5320 61254 6129 61304 1 

TSFLAG= 000040 30044 3006 41618 42048 42258 4227 4247# 4249 43454 

TSGMAN= 12918 40684 40774 4355# 4358 43648 53128 5315 53218 

TSHILI= 000776 40714 4075 43584 4362 53154 5319 61254 6128 61308 6133 

TSLAST= 000001 12918 61768 

TSLOLI= 000300 40714 4074 43584 4361 5315# 5318 61258 6127 6130" 6132 

TSLSYM= 010000 12914 1447 2920 2933 2947 2961 2981 3001 3114 3981 4169 4185 4212 
4233 4255 5881 5948 $091 6142 

TSLTNO= 000001 61794 

TSNEST= 177777 12918 12938 14184 14464 2906# 29198  2923# 2932# 2936# 2946# 29508 29608 29708 


29804 29894 30004 30884 31134 39708 39808 39908 39978 40064 41684 41808 41848 
4194@ 42118 42218 4232 4243# 42548 42718 57818 58808 59184 59478 60908 61084 


TSNSO = 000000 12934 6180 

TSNS1 = 000004 14188 1446 29064 2919 29234 2932 29364 2946 29504 2960 29708 2980 29898 
3000 30884 3113 39704 3980 39908 3997 40064 4168 41808 4184 41948 4211 
42218 4232 4243# 4254 4271# 6090 61084 6140 

TSNS2 = 000010 5781" 5880 59184 5947 

TSPTNU= 000000 12914 

TSSAVL= 177777 12914 

TSSEGL= 177777 12914 

T$SUBN= 000000 12914 42708 

TSIAGL= 177777 12914 

TSTAGN= 010023 12914 146184 2906 29234 2936# 29508 2970 2989 30884 39708 39908 40068 41808 
4194# 62218 42434 42718 57818 5918# 61084 

TSTEMP= 000000 14064 14074 14464 29198 29328 2946 29604 29808 30008 3004 3005 31134 39808 
39978 40714 41614 4162 4168# 41848 4204# 4205 4211# 42258 4226 42328 42478 


TSTEST= 000001 1291# 4270# 6179 
TSTSTM= 177777 12918 2916 2920 2929 2933 2943 2947 2957 2961 2977 2981 2997 3001 
32 3240 3280 3303 3317 3330 3343 3351 3375 3391 3406 3421 3429 

3449 3469 3508 3519 3527 3571 3671 3702 3848 3891 3981 4012 4017 
4022 4028 4039 4049 4061 4068 4083 4103 4137 4147 4154 4159 4161 
4169 4185 4199 4201 4204 4212 4233 4255 4288 4330 4339 4345 4355 
4375 4384 4413 4428 4454 4470 4567 4637 4682 4712 4775 4824 5154 
5172 5185 5228 5282 5312 5373 5396 5448 5459 5496 5502 5537 5560 
5701 5713 5834 £859 5998 6038 6045 6059 6091 

1$1STS= 000001 12918 42718 

TS$AU = 010016 4263#@ 4247 4254 
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CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -= USER SYMBOLS SEQ 0176 

TSSALT= 010013 41808 4184 

TSSCLE= 010014 41948 4204 11 

T$$0U = 010015 42218 4225 4232 

TSSHAR= 010022 61084 6141 

T$$HW = 010000 14184 1446 

TSSINI= 010012 40064 4161 4168 

TSSMSG= 010006 29064 2919 29234 2932 29368 2946 29508 2960 29708 2980 29894 3000 3004 

TSSPRO= 010011 39908 

TSSRPT= 010010 39704 3980 

TS$SRV= 010021 30884 3113 57814 5880 5918# 5947 

TSSTES= 010017 42718 4345 6090 

023620 G 1406 42708 

UAM = 000200 G 1522a 

UPTABL 027604 5032¢ 

UPTA1 027672 5038 50454 

UPTAS 027670 5042 5044a 

UPTAS 027630 5033 5037" 

UPTEK 027742 5044 50564 

VECTOR 034021 6131 61434 

x$ = 000163 1294#@ 20924 20934 20944 2095 20964 2097 20984 2099 2100# 21018 2102 21034 
21064 2105 2106 2107 2108 2109 2110 2114 21158 21168 21178 21188 21198 
2120 «21218 «21224 = 21234 = 21248 = 2125# = 2126 = 2127# = 21284 = 129% = 130M = 21318 = 1358 
2136 = 8=02137H = 2138H = 2139H = 1448 = 21458 21468 21478 2148 = 21518 21528 21538 21548 
2155 2156# 2157H 21584 21618 2162 21634 2164 21654 2160 21698 21708 21718 
2172# «62176 = =21778 = 2180# =21818 = 21838 = 21848 = 2187# = 21908 = 21918 21928 = 21938 = 21948 
2195@ 2196# 21978 21984 2199%  2200# 22018 2202 22034 2206 2207 22088 22098 
2210 «22118 22128 2215# 22168 2217# 2218 22198 22208 22238 22248 22258 22288 
22314 2232 22338 «2234 =2235H = 2236 = 22374 = 238K h1A 42H lk SH 4B 

XSALWA= 000000 12914 

XSFALS= 000040 12914 

XSOFFS= 000400 12914 

XSTRUE= 000020 12918 

SPATCH 034100 61704 

. = 034164 12918 17998 18058 18134 18254 18348 18384 18624 18918 1892# 18938 18948 18958 
18964 18998 19998 2000 20958 2101# 2108# 2115# 21178 21238 2125# 21368 21388 
21634 21654 21698 21718 176@ «6.2183 = 2190 =. 2192 = 2194# = 2196# = 2198H# 17H 198 
2235@ 23118 27804 3005 4162 420 4226 4248 4346 61718 





1 14 
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CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE == MACRO NAM SEQ 0177 

BCOMFL 1#@ 8612918 4013 4018 4029 4340 

BERROR if =612918 

BGNAU 1# 12918 4242 

BGNAUT 1# 12918 4179 

BGNCLN 1# 8612918 = =—4193 

BGNDU 1# 812918 4220 

BGNHRD 1# «8612918 6107 

BGNHW 1#@ 8612918 1417 

BGNINI 1# 12918 4005 

BG 1# 8612918 1292 

BGNMSG 1# 12918 2905 2922 2935 2949 2969 2988 

BGNPRO 1# 12918 3989 

BGNPTA 1# «12914 

BGNRPT 1#@ 812918 3969 

BGNSEG 1# 8612918 

BGNSET 1# 8612918 

BGNSFT 1# 12918 

BGNSRV 1# 12918 3087 5780 5917 

BGNSUB 1# 12918 

BGNSW 1# 612918 

BGNTST 1# 12918 4269 

BNCOMP 1# 8612918 4023 4041 4051 4062 4105 

BNERRO 1# = §=6129148 

BREAK 1# 8612918 5447 5501 5536 5700 $997 6037 6044 

BRESET 1# 812918 4200 

CKLOOP 1 12914 

Cl 1295@ 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 
2105 2106 2107 2108 2109 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 
2123 2124 2125 2126 2127 2128 2129 2130 2134 2135 2136 2137 2138 2143 2144 
2145 2146 2147 2150 2151 2152 2153 2154 2155 2156 2157 2160 2161 2162 2163 
2164 2165 2168 2169 2170 2171 2175 2176 2179 2180 2182 2183 2186 2189 2190 
2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2205 2206 2207 
2208 2209 2210 2211 2214 2215 2216 2217 2218 2219 2222 2223 2224 2227 2230 
2231 2232 2233 2234 2235 2236 2237 2240 2241 2242 2247 

CLOCK 1#@ 812918 4037 4047 

CLOSE 1# 12914 

LLRVEC le 12914 

COMME N 1#@ 12918 

DELAY 1# §=612918 

DESCRI 1@ 12918 2317 

DEVTYP 1#@ 812918 2307 

DISPAT 1#@ 8612918 1403 

DISPLA 1# 12918 

DOCLN 1# 12918 

DODU 1¢@ 812918 

DORPT 1@ 8612918 

ENDAU 1#@ 812918 4253 

ENDAUT 1#@ 12918 4183 

ENDCLN 1#@ 8612918 4210 

ENDCOM 1¢@ 8612918 

ENDDU 1#@ 8612918 4231 

ENDWRD 1@ 612918 6139 

cNOHW 1#@ 8612918 891445 

ENDINI 1@ 8612918 4167 

—ENOMOD 1#@ 12918 6179 

ENDMSG 1#@ 12918 2918 2931 2945 2959 2979 2999 
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CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -= MACRO NAMES SEQ 0178 

ENDPRKO 1# 12918 3996 

ENDPTA ie 12918 

ENDRPT 1# 12918 3979 

ENDSEG ie 8612918 

ENCDSET ie 12918 

ENDSFT i# «612918 

ENDSRV le 612918 3112 5879 5946 

ENDSUB i# 12918 

ENDSW i# 12918 

ENDTST 1# 12918 6089 

EQUALS 1# 812918 1462 

ERRDE 1# 12918 

ERRHRD l# 612918 

ERROR 1# 612918 

ERRSF 1# «612918 

ERRSOF 1# 812918 5153 5171 5184 5227 5458 5495 5559 5712 5833 5858 6058 

ERRTBL 1# 12918 

ESCAPE 1# 12918 

EXIT 1# 812914 3003 4160 4203 4224 4246 4344 

FEQUAL 1# 12918 

GETBYT 1# 12918 

GETPRI 1# 12914 

T 1# 812918 
GMANIA 1# 12918 
GMANID 1# 12918 4067 4354 5311 
NIL 1# 12918 

GPHARD 1#@ 812918 4101 

GPRMA 1#@ 12918 6124 6129 

GPRMD 1#@ 12918 40684 4071 4355@ 4358 5312@ 5315 

GPRML 1# 812918 6114 6134 

HEADER 1# 12918 1309 

INLOOP 1# 12914 

IOSETU l# 12918 

IOSTAR 1# 12918 

KT11 1#@ 12918 

LASTAD 1#@ 812918 6174 

MANUAL 1#@ 812918 4338 

MEMORY 1#@ 8612918 

MSBYTE 1#@ 12918 13108 1316 1317 1318 

MSCHEC 1#@ 812918 30046# 41618 420464 4225# 42478 43458 

MSCNTO 1#@ 8612918 40718 43584 53154 61154 6125@ 61308 6135¢ 

MSCOUN 1#@ 12918 29084 2925¢ 29388 29528 29728 29918 3229# 3237# 32778 3300# 33108 335258 33398 
33468 33698 3385¢ 36008 34178 34264 34468 34668 35048 35148 35238 35684 36648 356958 38458 
3asae 40808 (42858 43278 «0943728 «643818 «46098 «= 44248 44508 =—4466R «45638 =—46328 46798 «647098 = 47728 
48218 52798 5370#@ 53938 

MSDATA 1# 12918 13108 1319 1321 1323 1325 1327 1329 1331 1333 1335 1337 1339 1341 

343 1345 1347 1349@ 1351 1353 1356 1359 1361 1363 1365 1367 1369 1371 1373 

1375 1377 1379 1381 1383 1385 1387 1389 1391 1393 23084 23188 

MSDECR 1#@ 12918 14464 34h 2932¢ 29464 29608 29808 30008 3113@ 39808 39978 41688 41848 4oll# 
4232@ 4254@ 58808 9474 60904 61404 61808 

MSDEFA 1291@ 40718 43584 5315@ 61154 61258 61308 6155« 

MSE NDE 1@ 12918 16468 29198 29328 29664 29608 29808 30008 3113@ 39808 41688 41848 42118 42528 
4254@ 5880@ 59478 60908 61408 61804 

MSERR] 1 1291@ 5154#@ 51728 5185@ 52288 54598 5496@ 5560# 5713#@ 5834# 5859# 60598 

MSESCA 1e 612918 

MSESCS 1e 8612918 








CVCLHA DPV-11 DATA COMM. LINK TEST 
CVCLHA,P11 25-JUL=80 10:26 


MSEXCP 1# 12918 40714 43584 
MSEXIT oF 12918 0044 41614 
MSEXSE oF 12914 0044 41614 
MSEXTJ 1# 12918 0044 3005 
MSGEN 1#@ 12918 13108 13194 
13434 1345 13478 13494 
1375@ 4 1377#@ 13798 8 13814 
23184 29064 tabs 29234 
39704 39804 9904 40064 
4363@ 53208 $7814 ‘58808 
MSGENB a4 12914 40684 4069 
MSGETS 1 12918 14468 291984 
4232@ 42548 58804 5947” 
MSGETT 1 12914 3004 41614 
M$GNGB 1@ 12918 12934 13104 
13418 13438 13454 13478 
1373@ 4 601375@ 13778 = =«613794 
1420 23084 23184 29064 
42218 4243@ 57818 59188 
MSGNIN Fd 12914 13104 1311 
1323@ 861324 13254 1326 
1338 13394 1340 13414 
1353@ 1354 1355 13564 
1368 13694 1370 13718 
13834 8 1384 13854 1386 
23084 2309 2311 23184 
2917 29208 29258 29264 
2944 9478 9524 60378 
29778 978 9814 9918 
3114 32294 3230 3231 
3281 3300@ 33014 3302 
3325@ 3326# 33278 33284 
33484 33494 3350 3354 
33878@ 33888 33898 3390 
34188 34198 3420 34214 
34668 34674 3468 34698 
3518 35198 3520 35234 
36654 36664 36674 36684 
3702¢@ ©3703 3845¢@ 38464 
4014@ 40168 40178 40194 
40498 40508 40524 40614 
4082 40834 4084 41024 


5157#@ $1728 1 5174a 
5281 ageee 5283 53128 
5374 539 53948 5395 

5502@ 55378 5560# 55618 
58598 58618 58628 





K 14 
MACY11 30A(1052) 25-JUL=80 10:29 PAGE 182 
CROSS REFERENCE TABLE -- MACRO NAMES 


420468 42258 42678 4345¢ 

41614 $458 42258 26 4247# 4248 4345# 
13214 13234 1325@ 13278 13298 13318 13334 
13514 13534 1356# 13598 13618 13634 13654 
13834 13854 13878 13898 13918 13938 1405¢ 
29324 29364 29468 29508 29604 29708 29808 
40764 461684 41808 41848 41968 42118 42218 
59184 5947# 60908 61098 61418 61788 

4355#@ 4356 53128 313 

2932" 29468 29608 29808 30008 31138 3980" 
60904 61404 61804 

42068 42258 42478 43458 

1319@ 813218 1323@ 13258 13278 13298 133518 
1349@ 13518 13538 1356 13598 13614 13634 
13814 13834 1385¢@ 13878 13898 13918 13938 
29234 29364 29508 29708 29898 30884 39708 
61084 6109 6175# 6178 

1312 1313 1314 1315 13164 13178 13188 
13274 §=©1328 13298 1330 13314 1332 13334 
1342 13434 1344 1345#@ 1346 13478 §=1348 

1357 13584 13598 1360 13614 1362 13634 
1372 13734 861374 1375@ 861376 13778 =61378 

13878 1388 13898 1390 13918 1392 13934 
2319 2324 29084 2909 29108 2911 29128 
29278 2928 29298 2930 29334 29388 29398 
$o3e eh 1 2956 $oece $338 $368 $508" 
9928 G73@ = =—29948 9954 996 9978 998 

32324 3233 32378 3238" «©3239 32408 3241 

33034 3304 33108 8 33118@ 33128 33138 33148 
3329 3330#@ 3331 33398 8 33408 33418 3342 

3352 3369@ 833708 «33718 33728 «633738 863374 

33914 3392 34008 34018 34028 34034 34048 
3422 342 34278 34 34298 3430 34468 
3470 35044 3505 35064 3507 35084 

3524#@ 35254 3526 35278 3528 35684 35698 
36694 3670 36718 3672 36958 36968 36978 
3847 38484 3849 38898 8 638 38918 


5175@ 51858 51868 51878 51884 Tt 52298 
531 5314 5315@ 5316 5317 5318 5319 
53964 5397 54488 54598 54608 54618 54628 
5562@ «65563@ «657018 «657138 «(57148 «(57158 «57168 
58804 5881 59478 5948 5998@ 60388 60458 
6117 6125# 6126 6127 6128 61308 6131 


6 
61558 


SEQ 0179 









L 14 
CVCLHA DPVv-11_ DATA COMM. LINK TEST MACY11 30A(1052) 25=JUL-80 10:29 PAGE 183 
CVCLHA.P11 25-JUL-80 10:26 CROSS REFERENCE TABLE -- MACRO NAMES SEQ 0180 


6137 61408 61754 61768 61778 
1# 12918 40684 4076 4355# 4363 5312#@ 5320 


MSGNTA 1# 12918 «14668 = 29198 = 2932" = 29468 = 29608 §= 29808 §=— 30008 «31134 «= 39808 «41684 «4 1B4R 4211 42328 
42548 S880# 5947" 60908 61408 6141 

MSGNTE 1@ 12918 = 42708 

MSHAPT le 12918 «13108 

MSHNAP 1# 12918 «13108 = 1349 

MSINCR 1# «1291 12938 1418 2906" 2916" 29208 29238 29338 2936# 29634 29678 29508 29578 


5373a 54484 54594 54964 55024 55378 55608 57134 57814 58344 58594 59184 59984 
60384 60454 60594 60914 61084 
MSIOSE # 129148 
MSLDRO 18@ 12918 40118 4016 40214 40274 40384 4068# 4102 41584 41984 
MSMASK le 12914 
MSMCHI 1#@ 12914 
MSMCLO 1#@ 812914 
MSMSK1 1# 12914 
mSPOP 1#@ 812918 1464668 29198 2932 29464 29608 29808 3000 31134 39808 39978 41684 41848 42118 
4232@ 42548 58804 5947# 60904 61404 61804 
MSPRIN 12914 84 29254 29384 29524 29724 29918 32298 32378 32.78 330084 33104 33258 33398 
33468 3694 633854 34004 34174 34264 34468 34664 35048 35148 35234 35684 36644 36954 38454 
O# 62858 4327 4372 63814 44098 44248 44508 446664 45634 4632 46798 47098 47728 
48218 52798 $3708 53934 
MSPUSH 12914 12934 14184 29064 29234 29368 29508 29708 29898 30884 39704 39908 40068 41808 
41946@ 642218 42634 4270# 4271 57814 5918# 61084 
m$PuUT 1 12914 84 29254 29384 29524 29728 29918 32298 32378 32778 33008 33108 33258 33398 
33468 * 3385@ 34008 34174 34264 34468 34668 35048 (‘35148 35234 35684 36644 36958 38458 
40808 41334 41434 41508 42854 43278 43728 43818 44098 44248 44508 44668 45638 46328 
46798 47098 4772@ 468214 52798 53708 53938 
MS$PUTI 1# 12918 29084 10 2912 2 914 292584 2926 2927 29384 2939 2940 2941 29528 
53 954 2955 9728 2973 2974 2975 29918 2992 2993 2994 2995 32298 3230 32378 
3238 277# §©3278 3004 3301 33108 3311 3312 3313 3314 3315 33258 3326 3327 3328 
3339@ ©3340 3341 33468 3347 334 3349 33698 3370 3371 3372 3 3385@ 3386 3387 
3388 3389 34004 01 3402 340 3404 34178 3418 3419 34268 3427 34468 3447 34668 
3467 35044 3505 06 35148 3516 3517 35238 3524 3525 35684 3569 36648 3665 3666 
3667 3668 3669 36954 3696 3697 3698 3699 3700 38454 3846 3888e 3889 40808 4081 
4133@ 84134 4135 136 41438 4144 4145 4146 4150@ 4151 4152 3 42854 4286 43278 
4328 43728 6373 43814 4382 44094 4410 4411 642468 84425 4426 44508 4451 4452 44668 
4467 4468 45634 6564 565 46324 4633 4634 4635 46798 4680 4709# 4710 47728 8 4773 
48214 4822 52794 5280 5370#@ 5371 5393¢@ 5394 
MSRAD! W@ 12918 40714 43584 5315¢@ 61154 61258 61308 61354 
MSRBRO 4 12918 
1#¢ 12918 40384 4040 40484 4050 41020 
MSSETS @ 12914 12934 14184 9064 923@ 29368 29508 29708 29898 30884 39708 39908 40068 41808 
moves ee | : 214 62634 42718 7814 918a 61088 
m$SvC 1 12914 9088 916 9198 2920 29258 2929 29328 933 9388 2943 9468 2947 29528 
2957 961 9728 977 9808 $y <tya8 2997 0004 01 30048 2298 3232 32378 
3240 are 280 3004 303 3108 317 3258 3330 tiie. 3343 33468 51 33698 3375 
33aSa¢ 91 34008 3406 4178 421 34268 3429 34468 449 34668 3469 35040 508 35148 







MSTLAB 


MSTSTL 


CVCLHA.P11 


Mmroroenrer 


NMmronrr 


oOo 
—_ 
Be 


oouooo 
tt ot at 
RRRERE 


CVCLHA DPV-11 DATA COMM. LINK TEST 
25-JUL-80 10:26 


WOOrwuviwmn— ow 


ee Si a ye 
w 
& 


PRMMNPNNN OWI NN SWAN NYE FW NN EEE 


mn ee - OOOO MS Se 


CROSS REFERENCE TABLE -- MACRO NAMES 


DS HWA VINE & 


MPIMIPMIPIMIPININ OWI SS VINE Fwwnv' 


42044 


36644 
40 


Be 


MN HS HK OO OM NI OM FO OO 
oS 


wOnVYIn—-O 3-H Sr YNtOM ou" 
NSO NVYIWOFSO WF SOOO 


4225a 


8918 


MMMMNMNMPLNM BUmMmuwa nn fw 
mn ee HK OO Oe NN MOON 
uw 


we Onvyw O M&M 
@Onv@oofrovun te 


42478 


36958 
40 


&—- ONVYIW— 


43458 


M14 
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fFreoo@mvVw—o 


3848 38884 
4049 


40484 40 
4159 41618 
42478 = 42548 
413 hake 
47728 = 4775 
54484 5459 
6091 

9774 29818 
4218 34298 
4022" 40284 
41998 42018 
4o548 44708 
53968 54488 
60918 

29778 ©2981" 
34214 34298 
40224 40284 
41998 42014 
44548 44708 
53968 54484 
60918 

41618 42044 
5175. 51858 
5462 ©5496" 
5836 46-5837 
6177 

2101 +=. 2102 
2119 2120 
2137 2138 
2158 = 2161 
2183 2184 
2202. = 2203 
2223 = 2226 
2248 
4079 4284 
5278 5369 
3399-3416 


39804 
4 


SEQ 0181 


CVCLHA DPV=11 DATA Comm, LINK TEST MACY11 30A(10 
CVCLHA.P11 25-JUL=80 10:26 CROSS REFEREN 


- ABS. 034164 000 


ERRORS DETECTED: 0 
CVCLHA/1,CVCLHA. Pateer SVC34R.MLB,CVCLHA.P11 
RUN-TIME: 22 27 3 SECONDS 


RUN-TIME RATIO: 95/53=1. 
CORE USED: 19k (37 PAGES) 


052) 
cE 


25- ~JUL-80" 





N 14 
10:29 —— 185 


TABLE == MACRO NAME 


SEQ 0182 


